логической переменной p присвоить значение true, если введенное вами число делится

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

Задать свой вопрос
1 ответ

var a:integer; p:boolean;

begin

readln(a);

p:=a mod 3=0;

writeln(p);

end.

Пример:

10

FALSE

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт