Calkin-Wilf sequence: Difference between revisions
Content added Content deleted
(Added Algol 68) |
(→{{header|ALGOL 68}}: Use the Algol 68 MOD operator as per the revised Algol 68 sample for the Continued fraction/Arithmetic/Construct from rational number task) |
||
Line 132: | Line 132: | ||
INT prev numerator = numerator; |
INT prev numerator = numerator; |
||
numerator := denominator; |
numerator := denominator; |
||
denominator := prev numerator |
denominator := prev numerator MOD denominator; |
||
quotient |
quotient |
||
FI # r2cf # ; |
FI # r2cf # ; |