Greatest common divisor: Difference between revisions
→{{header|RPL}}: improved
(→{{header|RPL}}: improved) |
|||
Line 5,581:
=={{header|RPL}}==
≪ '''
'''Output:'''
<span style="color:grey">1:</span> 34
===Using unsigned integers===
≪ DUP2 < ≪ SWAP ≫ '''IFT'''
'''WHILE''' DUP B→R '''REPEAT''' SWAP OVER / LAST ROT * - '''END''' DROP
≫ '<span style="color:blue">'''GCD'''</span>' STO
#40902d #24140d <span style="color:blue">'''GCD'''</span>
'''Output:'''
<span style="color:grey">1:</span> #34d
=={{header|Ruby}}==
|