Составить программу на языке паскаль. Обусловьте, имеется ли посреди чисел a,

Составить программку на языке паскаль. Обусловьте, имеется ли посреди чисел a, b желая бы одно, кратное 5

Задать свой вопрос
1 ответ
program qq;
var a, b: integer;
begin
readln(a, b);
if a mod 5 = 0 then
write(Число_ a _кратно 5)
else b mod 5 = 0 then
write(Число_ b _кратно 5)
else
write(Чисел нет);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт