Написать программу в Паскаль, которая печатает числа в следующей последовательности, через вложенный цикл:
1
2 2
3 3 3
4 4 4 4
5 5 5 5 5

===== PascalABC.NET =====

begin

 var n := ReadInteger('Число строк?');

 for var i := 1 to n do

 begin

   for var j := 1 to i do

     Print(i);

   Writeln

 end

end.

Ответ:

Объяснение:

var i,j:integer;

begin

for i:=1 to 5 do begin

for j:=1 to 5 do write(j);

Writeln();

end;

end.