Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ilonazin03
11.09.2021 21:07 •
Информатика
Определите,является ли данное число четным или нечетным ( написать в pascal )
Ответ:
6aKalL
01.07.2020 23:46
var a: integer;
begin
read(a);
if a mod 2 = 0 then write ('Чётное')
else write ('Нечётное');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Мурад1001
22.07.2021 03:55
4. написати програму, яка запитує у користувача номер місяця і потім виводить відповідну назву пори року. c#...
sawa1989
15.12.2021 23:27
Укажите что из перечисленного не является объектом изучения информатики информация арифметические операции алгоритм аппаратное и программное обеспечение компьютера...
Быковских
30.06.2020 11:44
Значение здорового жизни ...
Triana
11.05.2023 06:36
Информационное сообщение объемом 375 байтов состоит из 500 символов. каков информационный вес каждого сообщения? какова мощность алфавита, с которого было записано это...
redkiller22
27.06.2022 13:19
2. На скільки годин і куди слід перевести стрілки годинників пасажирам, 3 киев до Риму...
vladikpadic
27.06.2022 13:19
Знайдіть різницю многочленів a+c і a+c-x...
ivanmilitskis
15.08.2020 20:08
Складіть сенкан до слова Батьківщина ....
gas2013
07.10.2022 17:20
Как в этом предложении пишется? На изнанку или наизнанку? Было такое чувство, будто меня выворачивают (на)изнанку....
alua070707
07.10.2022 17:20
Риса безкорисливої, щиросердної людини....
Dozie
07.10.2022 17:20
в безветренную погоду парашюте с высоты 431 м равномерно опускался 4 минуты 28 секунд Чему равна скорость парашютиста...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a: integer;
begin
read(a);
if a mod 2 = 0 then write ('Чётное')
else write ('Нечётное');
end.