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

1 2 3 4 ... n

2 3 4 ... n

3 4 ... n

...

n

Question

Володяха

2 июня, 06:28

+2

Ответы (1)

Знаете ответ?

Арсеныч · Answer 1

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.

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