Question

Даны два натуральных числа n и m. Если одно из них делится на другое нацело, выведите 1, иначе выведите любое другое целое число. При решении этой задачи нельзя пользоваться условной инструкцией if и циклами. Входные данные Вводятся два натуральных числа n и m. Выходные данные Выведите ответ на задачу. Примеры входные данные 2 8 выходные данные 1 входные данные 8 2 выходные данные 1

Answer 1

// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
begin
  var m,n:integer;
  Write('Введите два натуральных числа через пробел: ');
  Read(n,m);
  Writeln(Ord((n mod m = 0) or (m mod n = 0)));
end.

Answer 2

Для решения этой задачи без использования условных инструкций и циклов, можно воспользоваться арифметическими операциями и математическими свойствами.

Если одно число делится нацело на другое, то их остаток от деления будет равен нулю. Таким образом, мы можем воспользоваться операцией взятия остатка от деления.

Возьмем два числа n и m, и найдем остаток от деления большего числа на меньшее:

remainder = max(n, m) % min(n, m)

Если `remainder` равен нулю, то одно из чисел делится нацело на другое, и мы выводим 1. В противном случае, мы можем вывести любое другое целое число, например, 42:

result = 1 if remainder == 0 else 42
print(result)

Пример в Python:

n, m = map(int, input().split())
remainder = max(n, m) % min(n, m)
result = 1 if remainder == 0 else 42
print(result)

Для входных данных `2 8` результат будет `1`, а для входных данных `8 2` также результат будет `1`.