Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
seva0311
04.04.2020 01:37 •
Другие предметы
Наиболее напряженной формой борьбы за существование считают
Показать ответ
Ответ:
nastyakelman25
03.06.2020 10:24
Program Project;
var
I, N: Integer;
begin
for I:=0 to 9 do begin
ReadLn(N);
if (N Mod 2 = 0) then
WriteLn('чётное')
else
WriteLn('нечётное')
end;
end.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
nastakosmos12
29.01.2023 13:02
Семантикалық картаны орында/ выполни семантическую карту: Зат есімСын есімСан есімЕтістік Есімдік ЖұмбақҒаламшарЗерттедікӘдеміАйналадыБізЕшқайдаЕкінші Сендер ...
Андрей22111111
07.04.2021 19:24
химический состав предметов...
homyak8
20.07.2020 16:01
Составить комплекс из 10 гимнастический упражнений на ковре с пиктограммами...
Fargoo99
23.05.2021 11:07
Перечислите особенности спорта. не меньше 5 ...
budarnyypetr
21.05.2023 09:03
Жанды табиғат патшалығы. Патшалыққа тән сипаттамалар тақырыбында венн диаграммасы Нам надо на сегодня...
мам2017
01.11.2020 08:05
Как вы понимаете выражение « призвание в сердце Заранее...
alenushka73
13.08.2022 18:32
Какую главную мысль содержат средник,деисусный чин и клейма иконы Новомучеников и исповедников Российских...
fomax1337
24.09.2020 06:48
Определите цену деления и предел измерения кубика. Длина 3см 2мм, ширина 6см 8мм, высота 1 см 2 мм....
maha80
22.05.2021 05:18
Use the prompts to write complete statements with Present Perfect.Use for or since...
рашад10
08.04.2021 02:49
Макросреда одной казахастанской компании то есть к какому фактору она относиться (демографические; ; научно-технические; политические; культурная среда; природные.)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
I, N: Integer;
begin
for I:=0 to 9 do begin
ReadLn(N);
if (N Mod 2 = 0) then
WriteLn('чётное')
else
WriteLn('нечётное')
end;
end.