Question

Записать программу для печати звездочками любой фигуры ПАСКАЛЬ

Answer 1

Ответ:

program test;

var i, j: integer;

begin

for i:=1 to 7 do

begin

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

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

writeln

end

end.