Нахождение наибольшего общего делителя 2-х чисел.
Медленный но верный алгоритм:
while (i != j) if (i > j) i -= j else j -= i return i
repeata=a div b;b=b div a;until a=b;