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

1

Ответы и объяснения

Лучший Ответ!
2012-03-20T18:10:25+00:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

var a:integer;

Begin

  read(a);

  if a mod 3 = 0 then writeln('Делится')

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

  readln;

End.