найдешь основные операции над длинными числами, и ищи GCD (НОД) двух длинных чисел, пользуясь алгоритмом Евклида:
function GCD (A: integer; B: integer): integer; begin while (a <> 0) and (b <> 0) do if a >= b then a := a mod b else b := b mod a; GCD := a + b; end;
Также алгоритмы длинной арифметики можно посмотреть в DRKB (Математика, Алгоритмы -> Огромные числа)
Гость
15.05.2006 0:30
Дело в том, что мне нужно несколько алгоритмов нахождения НОД.
volvo
15.05.2006 1:01
Так ты с нами поделись тем, что именно тебе нужно. В первоначальном задании-то про "несколько алгоритмов нахождения НОДа" ни слова не было...
Так и будешь уточнять задание ПОСЛЕ того, как тебе будут отвечать? Тогда мы подождем...
Гость
15.05.2006 1:11
ОК... Тема реферата: "Нахождение наибольшего общего делителя двух больших чисел".
Мне нужно: 1)Представление больших чисел в Паскале(+ можно и в других языках програмирования); 2)Несколько алгоритмов нахождения НОД; 3)Примеры программ в Паскале(+ можно и в других языках програмирования) нахождения НОД; 4)Актуальность данной темы(точка зрения каждого);