Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Fhaj1
26.07.2022 07:04 •
Информатика
Составьте программу, которая запрашивает три числа и проверяет, делится их сумма на первое число без остатка.
Показать ответ
Ответ:
олололо12
03.10.2020 17:24
//Pascal ABC.NET v3.1 сборка 1219
Var
a,b,c:integer;
begin
read(a,b,c);
if (a+b+c) mod a=0 then writeln('Yes') else writeln('No');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
grigorisinnatal
29.03.2022 15:07
Напиши своё имя в двоичном коде на латинских буквах имя: vitaliy ryzhov....
flywitch
19.04.2020 05:03
Ученик набирает сочинение по на компьютере, используя кодировку koi-8. каждый символ в кодировке koi-8 занимает 8 бит памяти. определите какой объём памяти в байтах...
vikaoskina1
19.04.2020 05:03
Сколько существует различных наборов значений логических переменных x1, x8, y1, y8, которые удовлетворяют всем перечисленным ниже условиям? (x1∧¬x2)∨(¬x3∧(x1→x2))∨(x1∧y1)=0...
арманп
08.02.2021 23:46
Фотографу необходимо записать на диски, объемом 600 мбайт каждый, папку с фотографиями размер которой 2(35 степени) бит. сколько дисков израсходует фотограф?...
vangok31
31.12.2022 07:30
Файл размером 3,9 мб передаётся на файловый сервер в интернете. скорость передачи данных составляет 2 мбит/с. сколько секунд будет необходимо для передачи этого...
Russ1357900
31.12.2022 07:30
Вкакой форме удобно представлять алгоритм?...
angel32b
22.12.2020 17:54
Вперечне имён оставьте только те строки, которые не удовлетворяют маске ? l*ck*.*? • _click.txt • black.ppt • lo3ck.sts • blink.uta • applock.htm • blocker.htm...
RomqaShut
26.03.2022 09:42
Из всех туристов 16 побывали в америке, 10 в германии, 6 в . в и германии - пятеро, в и америке - 6, во всех трех странах - 5 сотрудников. сколько человек посетили...
Кись123
04.05.2022 05:43
Некоторый язык программирования допускает хранить в переменной целые неотрицательные числа размером не больше 2 байт, если же попробовать сохранить число в переменную...
12345678йцуке
19.12.2022 10:40
Паскаль доделать вклад в банке составляет x рублей. ежегодно он увеличивается на p процентов, после чего дробная часть копеек отбрасывается. каждый год сумма вклада...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var
a,b,c:integer;
begin
read(a,b,c);
if (a+b+c) mod a=0 then writeln('Yes') else writeln('No');
end.