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

Question

Василисса

19 мая, 14:07

+2

Ответы (1)

Знаете ответ?

Камилла · Answer 1

program esep5;

var

n:integer;

begin

writeln (‘san engiz’,’n') ;

readln (n) ;

if (n mod 3=0) then writeln ('yes')

else writeln ('no') ;

end.