Составьте программу, которая проверяет, делится ли на 3 введенное целое число, и выводит на экран соответствующее сообщение: "Делится" либо "Не делится"

Question

Виленина

19 октября, 03:36

+2

Ответы (1)

Знаете ответ на вопрос?

Аверкий · Answer 1

Вот на паскале:

var a:int;

begin

write ('input n:') ;

read (n) ;

if (n mod 3) = 0 then

writeln ('Делится')

else

writeln (' Не делится')

end.