Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
yukiko2
08.12.2021 22:59 •
Информатика
Написать рекурсивную процедуру для ввода с клавиатуры последовательности чисел и вывода ее на экран в обратном порядке(окончание последовательности-при вводе нуля).паскаль
Показать ответ
Ответ:
prestigpad
08.10.2020 06:56
PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!
procedure Foo;
begin
var k:integer;
Read(k);
if k<>0 then begin Foo; Print(k) end
end;
begin
Foo;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
SandraBulitl
30.04.2022 04:26
Вклассе 1111(2) девочек и 1100 (2) мальчиков. сколько учеников в классе?...
valeria276
13.04.2020 00:18
Как проверить одинаковые ли слова на Pascal. Если одинаковые то вывести «Yes», если нет то вывести «No». Заранее Ввод: стоп стоп Вывод: Yes...
www152
23.06.2022 12:43
Опишіть як можна створювати таблиці засобами HTML...
1Shupy4ka
19.10.2022 06:23
После преобразования растрового графического файла его объем уменьшился в 2 раза. сколько цветов было в палитре первоначально, если после преобразования было получено...
таир20
10.12.2022 15:18
Написать программу, которая переводит значение скорости v в размерерности м/сек в размерности км/час....
Br0cHk1
16.11.2022 06:36
Вычислите какое время потребуется для загрузки двухчасового цветного фильма если один его кадр содержит 1 MB Информации а за одну секунду сменяется 32 кадра скорость...
Kris905
29.03.2023 18:15
Определите объём 3 секунд видео с размерами кадра 1024 на 1024 глубина цвета 8 бит скорость воспроизведения 40 кадров в секунду...
venqa228
19.09.2022 06:43
Напишите код на Паскале для вывода на экран 15 случайных чисел в диапазоне от -150 до 120. На проверку нужно прислать скриншот программы с отображением кода и результата...
Яна775975
17.04.2021 05:53
ИНФОРМАТИКА: Предположи, как могут быть использованы свойства геометрических фигур и движений роботов...
Yulichka0829
08.05.2022 19:56
1. Что такое приводная платформа? 2. Какую программу нужно использовать дляконструирования приводной платформы?3. Для чего нужно конструирование приводнойплатформы?4....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
procedure Foo;
begin
var k:integer;
Read(k);
if k<>0 then begin Foo; Print(k) end
end;
begin
Foo;
end.