Multiplication tables: Difference between revisions
Content added Content deleted
m (→{{header|Phix}}: added syntax colouring the hard way) |
|||
| Line 4,412: | Line 4,412: | ||
</pre> |
</pre> |
||
=={{header|Mathematica}}== |
=={{header|Mathematica}}/{{header|Wolfram Language}}== |
||
<lang Mathematica>Grid[{{Range[12]//Column,Grid[UpperTriangularize[KroneckerProduct[Range[12],Range[12]]]/.{0->""}]}}]</lang> |
<lang Mathematica>Grid[{{Range[12]//Column,Grid[UpperTriangularize[KroneckerProduct[Range[12],Range[12]]]/.{0->""}]}}]</lang> |
||
{{out}} |
{{out}} |
||
| ⚫ | |||
<pre> |
|||
| ⚫ | |||
2 4 6 8 10 12 14 16 18 20 22 24 |
2 4 6 8 10 12 14 16 18 20 22 24 |
||
3 9 12 15 18 21 24 27 30 33 36 |
3 9 12 15 18 21 24 27 30 33 36 |
||
| Line 4,427: | Line 4,426: | ||
10 100 110 120 |
10 100 110 120 |
||
11 121 132 |
11 121 132 |
||
12 144 |
12 144</pre> |
||
</pre> |
|||
=={{header|MATLAB}} / {{header|Octave}}== |
=={{header|MATLAB}} / {{header|Octave}}== |
||