Войти Регистрация Спроси ai-bota

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

Показать ответ

Ответ:

Школа5101

16.08.2020 09:17

Var

n, i: integer;

begin

readln(n);

for i := n downto 1 do

write(i, ' ');

end.

0,0(0 оценок)

Популярные вопросы: Информатика

jkh40949

14.07.2021 07:05

РЕШИТЕ ТЕСТ КАКИЕ ЗНАНИЯ НЕОБХОДИМЫ НА ЭТАПЕ ТЕСТИРОВАНИЯ И ОТЛАДКИ? 1) ЗНАНИЯ ИЗ ПРЕДМЕТНОЙ ОБЛАСТИ ЗАДАЧИ 2) ЗНАНИЕ ТОГО, НА КАКОМ ЯЗЫКЕ ПРОГРАММИРОВАНИЯ БЫЛА НАПИСАНА...

34224253

03.02.2023 10:41

4. Определите правильный порядок созданияфигуры....

darabajkova4770

28.05.2023 19:50

Нужно создать программу на с++ для решения : заданы три сопротивлении r1, r2, r3 . вычислить значение сопротивления r0 поформуле: 1/r0 = 1/r1+1/r2+1/r3....

SoFiA5454555

03.02.2022 17:19

составьте словесный алгоритм и блок-схему для нахождения наименьшего из трех значений. без копирования с других сайтов!...

annkuzochka3

05.08.2020 08:22

Решите нужно. Заранее за правильные ответы....

ladhice

10.06.2022 14:42

Что будет напечатано в результате выполнения программы: program massiv; const n=10; a:array [1..n] of integer=(10,9,2,3,10,10,2,4,0,10); var i,k,j: integer; d:integer;...

Браснуев21

18.12.2020 13:03

В каких единицах вычисляется скорость передачи данных? в килобайтах/секв килобитах/секв Ваттахв километрах...

пик124

18.12.2020 13:03

Почему ответ 1? Если я не ошибаюсь, уменьшается только количество 9, о никак не троек. И тогда ответ - 93 тройки и 1 единица. Где я не прав?...

vlad1458

11.02.2021 17:10

Определить количество чисел кратных 4, но не кратных 6 в промежутке от 1 до n....

FAKOI

25.09.2021 02:41

составить кроссворд на тему физкультура, минимум 10 слов. Заранее...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку