Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
DJZargo
02.04.2023 03:14 •
Информатика
Ввели число, выясните , делится ли оно нацело на 3?
Показать ответ
Ответ:
safeer
05.10.2020 17:00
Program n1;
var a: integer;
begin
readln(a);
if a mod 3=0 then write('делится')
else write('не делится');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
natazhukova95
11.11.2022 16:08
2. 3D редактор - бул...а) үшөлшемді модельдеу, анимациялау және визуализациялауғаарналған программалық орта;b) қоршаған ортадағы үшөлшемді карапайым объектілермен модельдеудің...
ВикаKull
19.02.2020 02:58
Назовите исполнителей следующих видов работ печатания документа на принтере ...
jimitapark
21.02.2023 09:06
Вывести матрицу 5 на 5, заполненную случайными числами....
milanali
14.08.2022 09:23
Напишите программу которое выводить квадрат числа, введённого пользователя...
океекй
18.02.2020 06:18
Питон . напишите программу которая вводит с клавиатуры значения а и б и выводит квадраты всех целых чисел от а до б в порядке возрастания...
Анита1002
28.06.2020 21:53
Система команд исполнителя для исполнителя повара...
MatthewSan
14.12.2021 18:34
Pr1.bmp pr1.txt pr1.mp4 pr1.mp3 установите соответствие...
Mariiar
10.07.2020 09:00
Определи, может ли существовать такой IP-адрес: 115.149.204.122...
MrRobik
20.05.2021 12:59
Между населёнными пунктами A, B, C, D, E, F построены дороги, протяжённость которых приведена в таблице. (Отсутствие числа в таблице означает, что прямой дороги между...
Milanaмилана
10.01.2020 22:37
решить всё! все информатики сюда!...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a: integer;
begin
readln(a);
if a mod 3=0 then write('делится')
else write('не делится');
end.