Дано целое число n. вывести все целые числа от 1 до n в обратном порядке pascal

0 голосов
62 просмотров

Дано целое число n. вывести все целые числа от 1 до n в обратном порядке pascal


Информатика (150 баллов) | 62 просмотров
Дан 1 ответ
0 голосов

Var

  n, i: integer;


begin

  readln(n);

  for i := n downto 1 do

    write(i, ' '); 

end.

(3.6k баллов)
0

пойдёт?

0

да