3. определить, является ли число g делителем числа z или, наоборот, число z делителем числа g. ответом должно служить сообщение «да, одно из чисел является делителем другого» или «нет, ни одно из чисел не является делителем другого.

Natashasergeu Natashasergeu    2   11.09.2019 11:20    0

Ответы
Nikidiy Nikidiy  07.10.2020 07:20
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (g,z):=ReadInteger2('Введите через пробел два натуральных числа');
  if (g mod z=0) or (z mod g=0) then
    Writeln('Да, одно из чисел является делителем другого')
  else Writeln('Нет, ни одно из чисел не является делителем другого')
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика