Package: gpc
Version: 2:2.95.4-9
The "pc" compiler on Tru64 (formerly OSF/1 or Digital UNIX) has
radix control. NOTE: it is typed and works for negative values.
I get stuff like "-FFF" from -4095 but "EE6CD998" from 4000111000.
I've no idea how to get leading zeros on these.
PROGRAM radix ( input,output ) ;
begin
writeln('''', 4095:2:16, '''');
writeln('''', 4095:3:16, '''');
writeln('''', 4095:8:16, '''');
writeln('''', 4095:9:16, '''');
writeln('''', 4095:2:8, '''');
writeln('''', 4095:4:8, '''');
writeln('''', 4095:11:8, '''');
writeln('''', 4095:12:8, '''');
writeln('''', 4095:2:2, '''');
writeln('''', 4095:6:2, '''');
writeln('''', 4095:32:2, '''');
writeln('''', 4095:36:2, '''');
writeln('''', 4095:2:32, '''');
writeln('''', 4095:3:32, '''');
writeln('''', 4095:7:32, '''');
writeln('''', 4095:8:32, '''');
writeln('''', 4095:2:10, '''');
writeln('''', 4095:4:10, '''');
writeln('''', 4095:10:10, '''');
writeln('''', 4095:12:10, '''');
writeln('''', 4095:2, '''');
writeln('''', 4095:4, '''');
writeln('''', 4095:10, '''');
writeln('''', 4095:12, '''');
writeln
end.
@@@@@@@@@@@@@@@@@@@@@@@@@ SAMPLE OUTPUT @@@@@@@@@@@@@@@@@@@@@@@@@@@@
'FFF'
'FFF'
' FFF'
' FFF'
'7777'
'7777'
' 7777'
' 7777'
'111111111111'
'111111111111'
' 111111111111'
' 111111111111'
'3VV'
'3VV'
' 3VV'
' 3VV'
'4095'
'4095'
' 4095'
' 4095'
'4095'
'4095'
' 4095'
' 4095'
