Вводиться число n Вывести на экран по образцу (Программа в Pascal ABC)
1 2 3 4 ...n
2 3 4 ...n
3 4 ...n
........
n

Var
i, j, N:integer;

begin
readln(N);
for i:=1 to N do
begin
for j:=i to N do
write(j, );
writeln;
end;
end.

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!