Question

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

Answer 1

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

Answer 2

запустила программу, но так и не выходит ответ

Answer 3

никак не остановится

Answer 4

а, все