Реализации алгоритмов/Алгоритм Евклида: различия между версиями
Содержимое удалено Содержимое добавлено
Строка 204:
Более быстрый алгоритм:
<source lang="pascal">
function nod (a, b: LongInt): LongInt;
var
Строка 223:
В рекурсивном виде:
<source lang="pascal">
function nod(a, b:
begin
if b = 0 then
|