Составить программу, считывает 2 числа, если сумма этих чисел кратно 3, то результат уменьшает в 3 раза, в противном случае оставляет без изменений.

Хотите узнать готовый ответ на вопрос Составить программу, считывает 2 числа, если сумма этих чисел кратно 3, то результат уменьшает в 3 раза, в противном случае оставляет без изменений. и правильно решить домашнее задание по предмету Информатика? Подробное решение смотрите ниже.

Составить программу, считывает 2 числа, если сумма этих чисел кратно 3, то результат уменьшает в 3 раза, в противном случае оставляет без изменений.

Var
a, b:integer;
begin
Readln(a,b);
if (a+b)mod 3 = 0 then
Writeln((a+b)/3)
else
Writeln(a+b);
end.

Пример:
12 9
7


Похожие ответы

Напишите буквы н а д я в двоичном ,десятичном и шеснадцатитроичном кодах,только буквы отдельно плиз
Напишите буквы н а д я в двоичном ,десятичном и шеснадцатитроичном кодах,только буквы отдельно
На компакт-диске записана оцифрованная музыка в MP3-формате с бит-рейтом 128 Кбит/с. Сколько часов звучания содержит компакт-диск?
На компакт-диске записана оцифрованная музыка в MP3-формате с бит-рейтом 128 Кбитс. Сколько часов
ИНФОРМАТИКА,СРОЧНООООО,ФАЙЛ ПРИЛОЖЕН,УМОЛЯЮЮЮ
ИНФОРМАТИКА,СРОЧНООООО,ФАЙЛ ПРИЛОЖЕН,УМОЛЯЮЮЮ
Ребят помогите!!! Загадки к словам :телефон ,стол,диск,записная книжка,мышь и школа!! Буду очень благодарна!!
Ребят помогите!!! Загадки к словам телефон ,стол,диск,записная книжка,мышь и школа!! Буду очень
Помогите плиз 1 задание
Помогите плиз 1 задание