
Варсонофий
5 год назад
Напишите рекурсивную функцию, которая вычисляет НОД двух натуральных чисел, используя модифицированный алгоритм Евклида.Пример: Введите два натуральных числа:7006652 112307574НОД(7006652,112307574)=1234.Пожалуйста посчитайте пожалуйста
ОТВЕТЫ

Веселин
Oct 24, 2020
function Nod(a,b:integer):integer;
begin
if b=0 then Result:=a
else Result:=Nod(b,a mod b)
end;
begin
var a,b:integer; Read(a,b);
Writeln(Nod(a,b))
end.
701
Смежные вопросы: