Question

Составьте программу, выводящую true если высказывание истинно и false, если ложно: сумма двух чисел, введённых с клавиатуры кратна 3

Answer 1

var a,b:integer;

begin

read(a,b);

if (a+b) mod 3=0 then

writeln('True') else

writeln('False');

end.