5 lines
162 B
Turing
5 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
|