Standardni algoritmi
11. Euklidov algoritam za traženje NZM dva broja
ulaz (n,m);
dok je n<>m činiti
{
ako je
n>m onda
n:=n-m;
inače
m:=m-n;
}
izlaz ( n);
ulaz (n,m);
dok je n<>m činiti
{
ako je
n>m onda
n:=n-m;
inače
m:=m-n;
}
izlaz ( n);