Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
zoga2003
18.03.2020 06:41 •
Другие предметы
Написать программу, которая проверяет, является ли четным введенное пользователем цело число.
Показать ответ
Ответ:
fffff131
16.04.2019 22:50
Program zadacha_2;
var
n:integer;
begin
writeln(‘введите целое число’);
readln(n);
write(‘число’,n,’-‘);
if n mod 2=0
then writeln (‘четное’)
else writeln(‘нечетное’);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
LOLOLON2015
05.03.2023 03:25
Использую источник, полученные знания и идеи Карла Маркса о неизбежном переходе от капитализма к социализму 1. Определите социально-экономические предпосылки перехода от капитализма...
comr4de
14.09.2022 03:30
написать эссе. «Общественный идеал: содержание и пространственно -временная локализация в различных идеологиях» и привести пример персонажа из литературы...
lily20062601
29.10.2020 03:43
В честь кого названа улица Таманская в п. Стрелка Темрюкского района...
imoroz079
22.03.2021 23:29
Какова была роль социальных групп казахского общества...
gramma116
26.09.2021 10:42
Эссе ! стереотипы и установки, влияющие на судьбу описать примеры ситуаций, личных или профессиональных, когда стереотипы помешали добиться успеха укреплению страхов, ложных установок....
Еденарог5555
06.02.2020 00:20
Кому не сложно ответ на вопросы по философии...
UAola
21.02.2020 04:26
Екологічна карта міста василівка україна...
kiert
02.10.2021 11:40
Почему исключение из экосистемы аквариума простейших и моллюсков приводит к резкому нарушению ее равновесия?...
evasauteeva
02.10.2021 11:40
Приведите не менее трёх доказательств правильности теории эволюции Ч. Дарвина и синтетической теории эволюции....
SmartJager
02.10.2021 11:40
Кета вымётывает во время нереста несколько тысяч икринок, и только незначительная часть мальков достигает зрелого возраста. Назовите несколько...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
n:integer;
begin
writeln(‘введите целое число’);
readln(n);
write(‘число’,n,’-‘);
if n mod 2=0
then writeln (‘четное’)
else writeln(‘нечетное’);
readln;
end.