Question

СРОЧНО!!! Даю 30 баллов

Составить программу в Паскале

Вводится с клавиатуры число и на экран выводится квадрат (матрица).

Например: вводим число 2:

Получаем:

1 1

1 2

Вводим число 3:

Получаем:

1 1 1

1 2 2

1 2 3

и т.д.

Answer 1

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

begin

 var n := ReadInteger('n =');

 for var i := 1 to n do

 begin

   for var j := 1 to n do

     if j > i then

       Print(i)

     else

       Print(j);

   Writeln    

 end;

end.