Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Урлатоп
30.04.2021 00:39 •
Информатика
Напишите программу на pascal! является ли сумма трех чисел четным числом?
Показать ответ
Ответ:
irinkaff1
06.10.2020 18:45
Program sum;
var a, b, c : integer;
begin writeln('Введите три числа:');
readln(a, b, c);
if ((a+b+c) mod 2) = 0
then writeln('Сумма введенных чисел четная')
else writeln('Сумма введенных чисел нечетная');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
DelorenzyGang
06.04.2023 17:53
Питон. Напишите программу в котором я ввожу два числа N и M. Затем создаю двумерный массив NxM. Далее мы заполняем этот массив числами. Программа должна вывести максимальный...
veronikageletii
25.02.2020 05:51
Сосуды цилиндрической формы заполнены до краев жидкостью плотностью d=1200 кг/м3. составьте программу, которая вычисляет: а) давление столба жидкости на дно сосудов p=dgh(g=9.8м/с);...
ккк134
11.05.2020 12:50
Контрольная работа по теме «одномерные массивы», 9 класс. вариант – 1 написать программу для нахождения суммы элементов массива в(20), модуль которых больше 10. написать программу...
Kabesov
18.04.2022 11:38
−8,7(x−13)(x+26)=0 найти корни...
1аук7
15.02.2020 03:46
Установіть відповідність між героєм повісті Марини Павленко Руслонька із 7-в,або Прокляття роду Кулаківських та його характеристикою. 1.Вадим. 2.Сашко. 3.Валентин 4.Ростик...
саша4275
15.02.2020 03:46
Охотоведы установили,что весной на площади 20 км2 леса обитало 6 лисиц,причём самки составляли 50%.Ежегодно одна самка в среднем приносит 3-х детенышей .Средняя смертность...
aimsen
18.05.2021 14:48
:Раскрой скобки: −18⋅(−x−y+z) (при записи произведений соблюдай алфавитный порядок, записывай слагаемые без промежутков)....
usually1
18.05.2021 14:48
В прямоугольный равнобедренный треугольник с гипотенузой 6 см вписана окружность. Найти ее радиус....
PROFESSIONALL
21.08.2021 04:33
Сравнить папоротники, хвощи. плауны. Выявить сходство, установить различия...
Daxa666
21.08.2021 04:33
Напишите отрицательные стороны в правлении хана Жангира...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a, b, c : integer;
begin writeln('Введите три числа:');
readln(a, b, c);
if ((a+b+c) mod 2) = 0
then writeln('Сумма введенных чисел четная')
else writeln('Сумма введенных чисел нечетная');
end.