составить программу
ввести с клавиатуры 2 целых числа m и n >0 если m делится на n или наоборот, то вывести единицу, иначе любое другое число
Ответы
Ответ дал:
0
uses crt;
var m,n:longint;
begin
read(m,n);
if (m mod n=0) or (n mod m=0) then writeln(1)
else writeln(2);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад