Multiplication tables: Difference between revisions
Content added Content deleted
imported>Maxima enthusiast |
(→Insitux: implementation) |
||
Line 4,548: | Line 4,548: | ||
12 | 144 156 |
12 | 144 156 |
||
13 | 169 </pre> |
13 | 169 </pre> |
||
=={{Header|Insitux}}== |
|||
<syntaxhighlight lang="insitux"> |
|||
(var pad-num (comp str (pad-left " " 4))) |
|||
(join "\n" |
|||
(for y (range 1 13) |
|||
(... str "x" (pad-num y) |
|||
(for x (range 1 13) |
|||
(if (> y x) |
|||
" " |
|||
(pad-num (* x y))))))) |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
x 1 1 2 3 4 5 6 7 8 9 10 11 12 |
|||
x 2 4 6 8 10 12 14 16 18 20 22 24 |
|||
x 3 9 12 15 18 21 24 27 30 33 36 |
|||
x 4 16 20 24 28 32 36 40 44 48 |
|||
x 5 25 30 35 40 45 50 55 60 |
|||
x 6 36 42 48 54 60 66 72 |
|||
x 7 49 56 63 70 77 84 |
|||
x 8 64 72 80 88 96 |
|||
x 9 81 90 99 108 |
|||
x 10 100 110 120 |
|||
x 11 121 132 |
|||
x 12 144 |
|||
</pre> |
|||
=={{header|J}}== |
=={{header|J}}== |