Определить делится ли нацело произведение чисел на 3
Ответы на вопрос
Ответил aven7play
0
Var a:longint;
Begin
readln(a);
if a mod 3=0 then writeln('YES') else writeln('NO');
End.
Begin
readln(a);
if a mod 3=0 then writeln('YES') else writeln('NO');
End.
Новые вопросы