урок 13.1 задача 9
Primary tabs
M раз выведете на экран числа от 1 до N с помощью вложенных циклов. Так чтобы в консоли было:
11......NN}M раз
program delal.gleb!;
var i,j,l:integer;
begin
writeln('видите 2 любых числа через enter(целых) ');
readln(i);
readln(j);
repeat
for l:=1 to i do
write(l,' ');
writeln();
j:=j-1;
until(j=0) ;
readln();
end.
- Log in to post comments
- 2104 reads
vedro-compota
Tue, 06/21/2022 - 20:58
Permalink
переписать на внешний for
переписать на внешний for
_____________
матфак вгу и остальная классика =)
isaac_fan
Tue, 07/05/2022 - 16:20
Permalink
program delal.gleb!;
program delal.gleb!; var i,j,l:integer; begin writeln('видите 2 любых числа через enter(целых) '); readln(i); readln(j); for l:=1 to i do repeat for l:=1 to i do write(l,' '); writeln(); j:=j-1; until(j=0) ; readln(); end.vedro-compota
Thu, 09/08/2022 - 20:21
Permalink
for l:=1 to i do
-кентавр из циклов?
код явно не запускал
_____________
матфак вгу и остальная классика =)
isaac_fan
Mon, 09/12/2022 - 19:20
Permalink
var i,j,j:integer;
var i,j,l:integer; begin writeln('видите 2 любых числа через enter(целых) '); readln(i); readln(j); for j:=j downto i do repeat l:=l+1; writeln(j,' '); writeln(); until(l=i) ; readln(); end.