Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
asyasing
19.05.2023 18:53 •
Информатика
Выведите на экран в строку все числа первой сотни, но только четные
Ответ:
anzoroglyan1
24.07.2020 11:06
Var a,b,c:integer;
begin
for a:=1 to 100 do begin
if a mod 2 = 0 then write(' ',a,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
olesya8262
16.05.2023 15:13
Информатика,домашняя работа массиаы Объясните если сможете...
26Violetta26
25.04.2022 03:54
Что такое виртуальный графический объект?...
pozdniakova1998
25.04.2022 03:54
Дискета объемом 1024 кбайт весила 20 г. сколько бы весил набор дискет, необходимый для полного копирования информации с жесткого диска объёмом 15 гбайт?...
ilyazavrik
30.06.2021 06:25
Уменя есть водяные колонки, и они обе работают, но в одной не работает вода что делать? подскажите !...
snkashleva133
19.08.2022 23:30
10 ! какое двоичное число записано 1*2(4)+1*2(2)+1*2(0)...
Didasret
08.03.2021 23:44
Что такое структура программы загрузки и сохранения...
myrjyffiyfukfkufkyf
24.12.2022 14:06
Что будет если я вставлю в системный болок диск на котором поцарапан рисунок а с другой стороны на том диске царапины.и там еще он с мелкими ямками (ну виглядит...
princesa0409
24.12.2022 14:06
Как перевести 142 из 5-ой системы счисления в 10-ю? вроде делить на 5 и брать остатки, но я делю 142 на 5 и получаю 28 целое, 2 в остатке. далее 28 на 5 = 5, 3...
vayler50p014sh
08.10.2020 12:28
Перечислите основные элементы веб страницы...
Николь11189
08.11.2021 09:08
43 в двоичной системе счисления с решением а потом число которое получилось в десятичную...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
for a:=1 to 100 do begin
if a mod 2 = 0 then write(' ',a,' ');
end;
end.