GGT- und KGV-Rechner nach Euklid

Zahl 1:

Zahl 2:

Methode nach Euklid:

	input integer a,b > 0
	p = a * b
	Wenn a kleiner b dann tauschen
		Wiederhole
		{
			c = Rest (a/b)
			a=b
			b=c
		}
		solange c größer als 0 ist
	ggt = a
	kgv = p / ggt