Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Elizabeth041100
23.01.2021 06:01 •
Информатика
Составить программу проверяющую что введённое число делится без остатка на 3 ( паскаль)
Показать ответ
Ответ:
konfetkamailrup0acjk
08.10.2020 18:22
Program z1;
Var a: integer;
Begin
writeln('Введите число:');
readln(a);
if (a mod 3)=0 then
writeln('Число кратно 3.')
else
writeln('Число не кратно 3.');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
sevasik12
16.06.2021 21:13
Напиши как будет выглядеть компьютер будущего что он будет иметь и как он будет выглядеть...
Yulia475414
26.01.2021 13:18
Собстнная внутреняя память человека 17 букв...
zhenyasvetli4n
30.07.2020 06:30
Высота футбольных ворот 2м 44см а высота хоккейных ворот в 2 раза меньше.вычисли высоту хоккейных ворот...
rona3
30.07.2020 06:30
Что означает: дело не в мозгах,дело в...
231425
30.07.2020 06:30
Какое спряжение у глагола пела,сплёл,сидела,шелестели,лежал?...
Тимуркупцов123
30.07.2020 06:30
Вночной тишине под полом, вдруг послышались чьи-то тихие голоса они были похожи на шепот птенцов, которые пробудились в гнезде. синтакс. разбор...
StarBoy12ewq
30.07.2020 06:30
Отметь верные утверждения: 1. глаголы настоящего времени изменяются по лицам 2. глаголы времени изменяются по лицам 3. все глаголы, оканчивающиеся на -еть, относятся к...
temik261
30.07.2020 06:30
Запиши существительные в единственном числе одежда: шапки шу..ки, кофты, платки. посуда: ло..ки, ч..шки, ч..йники, казаны, пиалы....
ilyadengin
30.07.2020 06:30
Допиши предложение с выраженихи какой знак ты поставишь в конце предложения?...
youtubeadamchuk
30.07.2020 06:30
1)предельный углеводород содержит 84% углерода.установите формулу алкана. 2)при обработке 14,8 гр спирта натрием выделилось 2,24 л газа .определите формулу спирта. надо....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var a: integer;
Begin
writeln('Введите число:');
readln(a);
if (a mod 3)=0 then
writeln('Число кратно 3.')
else
writeln('Число не кратно 3.');
end.