Euklid-Algorithmus Dualzahlen
zahl=123
basis=2
while
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
:
....quotient=
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
....rest=
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
....print(zahl,":",basis,"=",
%
>
//
=
0
basis
quotient
rest
zahl
," ",
%
>
//
=
0
basis
quotient
rest
zahl
)
....
%
>
//
=
0
basis
quotient
rest
zahl
%
>
//
=
0
basis
quotient
rest
zahl
quotient
Check
OK