Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
pavdora073539
23.04.2023 17:00 •
Информатика
Составить программу на языке паскаль составить программу разветвляющей структуры написать прогрумму, которая проверяет, является ли введенное с клавиатуры число четным и положительным
Показать ответ
Ответ:
Alica2653
07.10.2020 12:36
Var a:integer;
begin
read(a);
if a mod 2=0 then writeln('Число четное')
else writeln('Число нечетное')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
DrNick
04.02.2021 10:55
Чем отличается триггер от анимации в...
ApostalVooDoo
06.05.2021 00:29
Как это решить? Желательно быстрее...
ВыберитеНик976476
13.08.2021 00:32
С++ В одномерном массиве с четным количеством элементов (2N) находиться координаты N точек плоскости. Они располагаются в следующем порядке: x1, y1, x2, y2, x3, y3 и т.д....
Дианчик777
29.10.2020 23:44
С++Вывести на экран таблицу стоимости для 10, 20, 30, ..., 100 шт. товара, при условии, что одна штука товара стоит price руб. (значение price водится с клавиатуры), причем,...
77darihi
26.12.2020 01:00
Вставь слова. компьютер - это электронное созданное для обработки информации....
mebelru
10.09.2022 23:39
Вы идете на день рожденья и по дороге заглядываете в книжный магазин, что бы купить подарок. вам приглянулись три книги по цене 260 рублей каждая. после осмотра своих...
RetoGero
01.03.2023 09:22
Какой объем видеопамяти необходим для хранения четырех страниц изображения, если битовая глубина равна 24, а разрешающая дисплея - 1024х768 пикселей?...
aprel123
03.09.2020 09:35
№12составьте программу для нахождения таблицы значений при решении системы уравненийесли z 1ү= ✓|3z + cosz^3| если z 1ү=4z-✓z/ sin^4(z-2) если z≥1если z изменяется от...
nyutadavdova200
27.04.2022 07:15
Прощение фал методом куайна-макласки. по фамилии (новиков) и нужно построить логическую функцию. для этого отобразить алфавит в 4 битный равномерный код, в котором каждой...
Ilka1k
23.04.2022 12:11
нужно закодировать латинскую пословицу двоичном кодом a mari usque ad mare....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
read(a);
if a mod 2=0 then writeln('Число четное')
else writeln('Число нечетное')
end.