10 баллов! Напечатайте числа в виде таблицы (т.е. написать программу в Паскале) ...

July 2022 1 10 Report

10 баллов! Напечатайте числа в виде таблицы (т.е. написать программу в Паскале)
3 3 3
3 3 3
3 3 3

Gleb1Kosyrev

Var n,i,j:integer;
begin
readln(n);
for i:=1 to n do
begin;
writeln;
for j:=1 to n do
write(n:3);
end;
end.

1 votes Thanks 1