RosettaCodeData/Task/Literals-Integer/XPL0/literals-integer.xpl0
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

7 lines
220 B
Text

code CrLf=9, IntOut=11;
def A=123, B=$123, C=%11_0011, D=^A;
[IntOut(0, A); CrLf(0); \decimal
IntOut(0, B); CrLf(0); \hex
IntOut(0, C); CrLf(0); \binary
IntOut(0, D); CrLf(0); \ASCII
]