Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
semenem15
04.03.2020 15:23 •
Информатика
Определить является ли число a чётным (алгоритм на языке прогр)
Показать ответ
Ответ:
bWn
02.07.2020 20:26
Program chisla;
var a,b:integer;
begin
read (a);
if
b=a div 2 then
write('Число четное') else
write('Число нечетное');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
romanbeletsky2
20.09.2022 15:45
ответить на вопросы : а) можно ли приступать к моделированию , если неизвестно : кто будет жить в доме , сколько человек , сколько будет в доме этажей , дверей , окон ,комнат...
gubankowauly19
24.03.2022 22:26
Запишите оператора для вывода значений целых переменных a=5 b=3 по формуле 5+3=? в ответе не используйте пробелы (только write без ln)...
753BC
23.03.2020 00:24
1кг конфет стоит 98 рублей сколько стоит 2,4, кг решение , !...
erasildamir
07.11.2022 12:06
Напишите программу которая будет вычислять площадь прямоугольника....
xuimorjovi
14.11.2020 22:23
Рассказ набранный на компьютере имеет некоторое количество страниц. на каждой странице 84 строки. на каждой строке 40 символов.информационный объем рассказа составляет 210...
зака16
22.12.2020 21:53
Дано двухзначное целое число . определить ,верно ли ,что сумма данного числа и его «перевертыша» меньше 100...
незнайка1186
13.03.2022 01:57
Вычислить количество слагаемых у выражения 1/2+1/5+1/8+1/ складывать, пока слагаемое не станет меньше n...
18alena2002
12.02.2020 20:26
Придумайте несколько вариантов описания одного и того же объекта для разных целей....
Ruslanchik111
07.03.2022 19:56
Объясните алгоритмы ! в информатике(осис)...
Темирлан2003
08.03.2022 06:40
Всекцию приенемают мальчиков в возрасте от 10 до 12 лет и ростом не ниже 1,40м и выше 1,55м. определите примут ли в секцию мальчика 13 лет и ростом 1, 47. написать программу...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,b:integer;
begin
read (a);
if
b=a div 2 then
write('Число четное') else
write('Число нечетное');
end.