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

Question

Ананий

16 ноября, 01:41

+3

Ответы (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.