• Дано 2 числа. Проверь если большее число делится на меньшее точно.
    Пример: Входные данные: 10 250; Выходные данные: 250 делится точно на 10
    На Паскаль нужно решение, пож.

Ответы 1

  • program aaa;var a,b: integer;beginwriteln('Введите два числа:');readln(a,b);if a>b then beginif (a mod b) = 0 thenwriteln('число ',a,' точно делится на число ',b)else writeln('число ',a,' не делится на число ',b,' без остатка');end;if b>a then beginif (b mod a) = 0 thenwriteln('число ',b,' точно делится на число ',a)else writeln('число ',b,' не делится на число ',a,' без остатка ');end;end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years