логической переменной p присвоить значение true, если введенное вами число делится без остатка на 3 и false в противном случае. Вывести значение переменной p на экран.
В паскаль срочно

Ответ

Автор - petyaGavrikov

var a:integer; p:boolean;

begin

readln(a);

p:=a mod 3=0;

writeln(p);

end.

Пример:

FALSE

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.