RosettaCodeData/Task/Multiplication-tables/Mathematica/multiplication-tables.math
2023-07-01 13:44:08 -04:00

1 line
101 B
Text

Grid[{{Range[12]//Column,Grid[UpperTriangularize[KroneckerProduct[Range[12],Range[12]]]/.{0->""}]}}]