Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Adelinchik2309
05.11.2021 05:58 •
Информатика
Составьте программу , которая выводит последовательность 50,48,46,44……2
И ЕЩЁ,ТУТ НУЖЕН ЦИКЛ downto ИЛИ Я НЕ ПОНИМАЮ.
Главное сделайте через For i := 1 to n do begin.
Ответ:
ranilgalimzyanov
14.10.2020 20:48
var i:integer;
Begin
for i:= 50 downto 2 do
if (i mod 2) = 0 then write(i, ' ');
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Zalina4272Bdjdkxc
24.11.2022 03:02
Определите, какое из указанных имён файлов не удовлетворяет маске *un? *.d?*Ofunds.daO uncle.tdOround.docOfortune.dpi...
gels5344Inetka
16.06.2022 04:34
Разработать алгоритмы и по ним составить блок-схемы. a)вычисления функции y=(10x+x^2-1)(10x+1) b)найти площадь основной пирамиды s, если известна высота h и объем пирамиды...
Suprunenko2007
16.06.2022 04:34
Из каких команд состовляется линейный вычислительный алгоритм?...
lerabregneva
15.05.2022 07:20
Таблица кодировки символов устанавливает соответствие между...
rockmus
15.05.2022 07:20
Оперативная память компьютера содержит 163840 машинных слов (наибольшую последовательность бит, которую процессор может обрабатывать как единое целое), что составляет 0,625...
uhjvjvjkybz
21.02.2020 13:39
Напишите программу, которая определяет количество записанных чисел в файле в столбик, и выводит результат в другой файл....
Географица00
09.11.2020 20:51
Как объяснить написание слова хвощом с правилом...
Elaria1
09.11.2020 20:51
Вот что значит настоящий верный друг. доклад 4 класс...
nikgolubev2000
09.11.2020 20:51
Получите нитрат меди(2) двумя различными нитрат аммония, хлорид калия, нитрат натрия....
ирина1523
09.11.2020 20:51
2/5: х=12/25: 3/10 найдите при этом х...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i:integer;
Begin
for i:= 50 downto 2 do
if (i mod 2) = 0 then write(i, ' ');
End.