Question

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

Answer 1

program chisla;
var a:integer;
begin
read(a);
if (a mod 3)=0 then writeln('Lubit')
else writeln('Ne lubit');
end.