Вводятся два целых числа. Выведите YES, если их сумма делится на 3, NO в ином случае.

Ввод Вывод

1 2 YES

Ввод Вывод

2 5 NO

Question

Информатика

Галлии

17 марта, 15:48

Вводятся два целых числа. Выведите YES, если их сумма делится на 3, NO в ином случае.

Ввод Вывод

1 2 YES

Ввод Вывод

2 5 NO

+1

Ответы (1)

Знаете ответ на вопрос?

Лаврюха · Answer 1

Program abs;

var x, y, z:integer;

begin

readln (x) ; {первое число}

readln (y) ; {второе число}

z:=x+y; {их сумма}

if (z mod 3) = 0 then

writeln (''Yes'')

else writeln (''NO'') ;

end.

Вводятся два целых числа. Выведите YES, если их сумма делится на 3, NO в ином случае.Ввод Вывод1 2 YESВвод Вывод2 5 NO

Вводятся два целых числа. Выведите YES, если их сумма делится на 3, NO в ином случае.

Ввод Вывод

1 2 YES

Ввод Вывод

2 5 NO