Предмет: Информатика,
автор: BROVATOA
Напишите рекурсивную функцию, которая вычисляет НОД двух натуральных чисел, используя модифицированный алгоритм Евклида.
Пример:
Введите два натуральных числа:
7006652 112307574
НОД(7006652,112307574)=1234.
Помогите пожалуйста
Ответы
Автор ответа:
0
// PascalABC.NET 3.2, сборка 1385 от 14.02.2017
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.
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.
Автор ответа:
0
Что значит "неправильно", когда ответ совпадает с контрольным примером?
Похожие вопросы
Предмет: Алгебра,
автор: Аноним
Предмет: Химия,
автор: violaskripnik
Предмет: Математика,
автор: kzh122doc
Предмет: Обществознание,
автор: shklyarov2012
Предмет: Математика,
автор: варфоломеев