ребят помогите написать программу с подмогою Паскаль

Ребят помогите написать программку с поддержкою Паскаль

Задать свой вопрос
1 ответ
Program z1;
var a:integer;
Begin
read(a);
if (a mod 3=0) and (a mod 10=8) then
writeln('Число делится нацело на 3 и заканчивается на 8')
else
writeln('Выводит не будем')
End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт