Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Hhdhcnxh475366
22.10.2020 12:32 •
Информатика
Написать программу , которая выводит на экран натуральные числа от 1 до n в обратном порядке. число можно ввести с клавиатуры. pascal
Показать ответ
Ответ:
manetsevap010xz
06.10.2020 11:29
Var
n, i: integer;
begin
read(n);
for i := 1 to n do write(n - i + 1, ' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
aleksandrantonov
17.09.2020 18:52
1. Разместить на сайте свою фотографию и написать о себе. 2. Разместить на сайте загадки. 3. Разместить на сайте игру «Угадайка» для двух игроков. 4. Разместить на сайте Генератор...
shutilkaha
02.06.2021 21:05
Переведите в Килобайты 2 Мб, 1 Гб...
Katerka
28.09.2021 23:18
Отправьте сор потинформатике 5класс 4четверть презентация проекта...
Kostia06
27.07.2021 07:32
Умаляю. и ввести 2 числа. вычесть из большего меньшее нужна прям в программе...
ZA25
26.05.2021 01:42
Умаляю и ввести 2числа. вычесть из большего меньшее...
izmaylova77
30.08.2020 06:06
Составить алгоритм для проведения спорт концерта! (должно быть не менее 20 ти шагов) 40 ! предмет-информатика...
dasha240417
15.05.2020 22:50
Опишите модель решения поставленной...
nmpepatop1
08.03.2023 19:09
F: =2 a: =3 while a 7 do begin f: =f * a div 3; a: =a + 1 end...
наифа
06.01.2022 05:04
Вычислите степень диссоциации и рН 0,2%-ного раствора сульфаниловой кислоты (К = 6,3·10-4). Плотность раствора принять 1 г/см3...
IvIeIrIoInIiIkIa
06.01.2022 05:04
ООО «Скай-лифт» является кредитором ООО «Газлифт». Сумма задолженности составляет 3 600 000 рублей. ООО «Донстрой», желая получить оборудование у ООО «Газлифт», предложило взамен...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n, i: integer;
begin
read(n);
for i := 1 to n do write(n - i + 1, ' ');
end.