Предмет: Информатика,
автор: OnlyFall
Определить делится ли нацело произведение чисел на 3
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: Физика,
автор: poolmary506
Предмет: Химия,
автор: kseniya69max
Предмет: Русский язык,
автор: Аноним
Предмет: Математика,
автор: марьямelya2222em
Предмет: Математика,
автор: виола041