6 lines
162 B
Turing
6 lines
162 B
Turing
|
$$ MODE TUSCRIPT
|
||
|
|
LOOP arab_number="1990'2008'1666"
|
||
|
|
roman_number = ENCODE (arab_number,ROMAN)
|
||
|
|
PRINT "Arabic number ",arab_number, " equals ", roman_number
|
||
|
|
ENDLOOP
|