Multiplication tables: Difference between revisions

Added Neko
No edit summary
(Added Neko)
Line 3,436:
11 | 121 132
12 | 144
</pre>
 
=={{header|Neko}}==
<lang ActionScript>/**
Multiplication table, in Neko
Tectonics:
nekoc multiplication-table.neko
neko multiplication-table
*/
 
var sprintf = $loader.loadprim("std@sprintf", 2);
 
var i, j;
 
i = 1;
$print(" X |");
while i < 13 {
$print(sprintf("%4d", i));
i += 1;
}
$print("\n");
$print(" ---+");
i = 1;
while i < 13 {
$print("----");
i += 1;
}
$print("\n");
 
j = 1;
while j < 13 {
$print(sprintf("%3d", j));
$print(" |");
i = 1;
while i < 13 {
if j > i {
$print(" ");
} else {
$print(sprintf("%4d", i*j));
}
i += 1;
}
$print("\n");
j += 1;
}</lang>
 
{{out}}
<pre>prompt$ nekoc multiplication-table.neko
prompt$ neko multiplication-table
X | 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
3 | 9 12 15 18 21 24 27 30 33 36
4 | 16 20 24 28 32 36 40 44 48
5 | 25 30 35 40 45 50 55 60
6 | 36 42 48 54 60 66 72
7 | 49 56 63 70 77 84
8 | 64 72 80 88 96
9 | 81 90 99 108
10 | 100 110 120
11 | 121 132
12 | 144
</pre>
 
Anonymous user