Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Вика7473
22.05.2020 19:13 •
Информатика
Проверить, что сумма цифр введённого вами двухзначного числа делится без остатка на 3
Ответ:
денис1139
06.10.2020 20:58
Program n1;
var a: integer;
begin
readln(a);
if (( a mod 10)+(a div 10)) mod 3=0 then write('true') else write('false');
end.
0,0
(0 оценок)
Ответ:
Kseniyak04
06.10.2020 20:58
Последняя цифра должно делиться на три
0,0
(0 оценок)
Популярные вопросы: Информатика
profi14
12.01.2020 04:23
Напишите 3 задачи на языке Паскаль...
кика20051
15.05.2020 03:18
3,5 Mb сколько не пишите рандомно...
KIRICHbyKIRICH
19.02.2022 14:15
Диаграмманы калай жоюга болады...
глупенький11
18.03.2020 04:56
Какими можно создать круг . Запишите основные моменты . Приложение Скетч ап мэйк ...
ruzannakokh
05.12.2022 18:31
Python. Считается, что один год, прожитый собакой, эквивалентен семи человеческим годам. При этом зачастую не учитывается, что собаки становятся абсолютно взрослыми уже...
Cxvdjx830u5b
28.11.2021 19:13
9. Есепте.122 см - 3248 дм : 2682 см : 2639 м: 34 м 45 см +4 м 56 см10 м – 2 м 43 см...
помогитеяглупая
08.09.2021 03:56
Екі топқа бөлініп, жағдаяттық тапсырманы орындаңдар.Топтарыңа шетелдік қонақ келді. Өз еліңмен, ондағы құнды мұраларментаныстыруды сұрады. Бір нысанды таңдап алып, таныстырыңдар...
nanakiriya
21.09.2020 21:56
Сочинение рассуждение на тему «Что такое свобода человека?» ...
grmej
01.11.2022 05:56
Это доказательство того,что в же эндосперме запасаеться......
dontsovaelizav
12.09.2020 11:35
Turn the following sentences into reported speech. Make all necessary changes (Перепиши предложения в косвенной речи, производя все необходимые изменения...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a: integer;
begin
readln(a);
if (( a mod 10)+(a div 10)) mod 3=0 then write('true') else write('false');
end.