Non-decimal radices/Output: Difference between revisions

Line 1,023:
 
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>Scan[PrintTable[IntegerString[#n, 2b], "{n,"Range@38}, IntegerString[#{b,{2, 8,16,36}}], // Grid</lang>
",",#, ",",IntegerString[#, 16],",", IntegerString[#, 36]]&, Range[38]]</lang>
{{out}}
<pre>1, 1, 1,1, 1
 
10,2,2,2,2
10 2 2 2
11,3,3,3,3
 
...
11 3 3 3
...
 
100010,42,34,22,y
100 4 4 4
100011,43,35,23,z
...
100100,44,36,24,10
 
100101,45,37,25,11
100010, 42,34, 22, y
100110,46,38,26,12</pre>
 
100011, 43,35, 23, z
 
100100, 44,36, 24, 10
 
100101, 45,37, 25, 11
 
100110, 46,38, 26, 12</pre>
</pre>
 
=={{header|MATLAB}} / {{header|Octave}}==
1,934

edits