Написать программу вычисления наибольшего общего делителя двух натуральных чисел используя оператор while. СРОЧНО!
Написать программу вычисления наибольшего общего делителя двух натуральных чисел используя оператор while. СРОЧНО!
Гость
Ответ(ы) на вопрос:
Гостьvar
m, n: word;
begin
readln(m, n);
while m <> n do begin
if m > n then begin
m := m - n
end else
begin
n := n - m
end
end;
writeln(m)
end.
Не нашли ответ?
Похожие вопросы