Заданы натуральные числа n и m. Найти НОД(n,m) (наибольший общий делитель). Составить программу, которая будет содержать рекурсивную функцию вычисления НОД, которая основана на соотношении НОД(n,m)=НОД(m,r), где r – остаток от деления n на m - Pascal(Паскаль) - Справочник юного программиста Pascal/Delphi

program D;
var
a,b :integer;
begin
writeln('Введите a, b');
readln(a,b);
while a<>b do
if a>b then
dec(a,b)
else
dec(b,a);
writeln('НОД ',a);
end.