Multiplication tables: Difference between revisions

Content added Content deleted
Line 1,358: Line 1,358:


=={{header|Mathematica}}==
=={{header|Mathematica}}==
<lang Mathematica>Grid[{{Range[12]//Column,Grid[UpperTriangularize[KroneckerProduct[Range[12],Range[12]]]/.{0->""}]}}]
<lang Mathematica>Grid[{{Range[12]//Column,Grid[UpperTriangularize[KroneckerProduct[Range[12],Range[12]]]/.{0->""}]}}]</lang>
Output:
<pre>
1 1 2 3 4 5 6 7 8 9 10 11 12
1 1 2 3 4 5 6 7 8 9 10 11 12
2 4 6 8 10 12 14 16 18 20 22 24
2 4 6 8 10 12 14 16 18 20 22 24
Line 1,371: Line 1,372:
10 100 110 120
10 100 110 120
11 121 132
11 121 132
12 144</lang>
12 144
</[pre>


=={{header|MATLAB}}==
=={{header|MATLAB}}==