
Zhyasurt
7 год назад
Батырхан любит числа которые без остатка делятся на 3. К сожалению для очень больших чиселон не может проверить должен ли он любитьего или нет. Помогите ему написав программу, которая поможет ему.
ОТВЕТЫ

Макарий
Jul 14, 2019
Program chisla;
var a:integer;
begin
read(a);
if (a mod 3)=0 then writeln(Lubit)
else writeln(Ne lubit);
end.
var a:integer;
begin
read(a);
if (a mod 3)=0 then writeln(Lubit)
else writeln(Ne lubit);
end.
119