1. Информатика
  2. Дано целое число n. вывести все

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

dennikitos dennikitos    1   04.09.2019 03:20    0

Ответы
bondarantona bondarantona  16.08.2020 09:17
Var

  n, i: integer;

begin

  readln(n);

  for i := n downto 1 do

    write(i, ' '); 

end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
DimasStar1 DimasStar1  19.07.2019 00:00
Подбери такое слово, чтобы оно было одновременно и окончанием для фиолетового, и началом для зеленого слов....
bistreeee bistreeee  19.07.2019 00:00
Перечислите основные возможности растрового графического редактора paint...
valeriafds valeriafds  19.07.2019 00:00
Составить программу, которая определяет, есть ли среди цифр целого трёхзначного числа одинаковые...
goldin1337 goldin1337  19.07.2019 00:00
Для какого из чисел истинно высказывание (число 75 ) и не ( число чётное) нужна ваша !...
seregatarlykov seregatarlykov  01.11.2020 20:30
разобраться, как это записать в ответ? Определите значение переменной «a» после выполнения фрагмента программы: a: =10; b: =3; if a b then b: = b + 12 else a: = a - 7;...
kli200192uasmi kli200192uasmi  01.11.2020 20:40
Отметьте алфавит, мощность которого равняется трем: 0, 1, 2 А, Б, В...
lololololololololo11 lololololololololo11  01.11.2020 20:48
Какая функция используется для определения положения символа в таблице ASCII?​...
6ВинишкоТян9 6ВинишкоТян9  01.11.2020 21:01
Информатика 9 класс. Контрольная...
knopendui knopendui  01.11.2020 21:02
Информатика 9 класс, контрольная...
dezmond1992 dezmond1992  01.11.2020 21:03
А то я не могу разобраться в этой теме Определите значение переменной «b» после выполнения фрагмента программы: a := 10; b := 30; if a b then b : = b+12 else a := a -7...

Популярные вопросы