Написать программу вычисления наибольшего общего делителя двух натуральных чисел используя оператор 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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.