Question

Написать программу, используя вложенные циклы получить на экране следующее изображение.

Answer 1

Ответ

var i,j:integer;

begin

for i:=1 to 4 do

begin

for j:=1 to i do write(j,' ');

writeln;

end

end.

2.

var i,j:integer;

begin

for i:=1 to 4 do

begin

for j:=1 to i do write(i,' ');

writeln;

end

end.