Multiplication tables: Difference between revisions

Content added Content deleted
No edit summary
(added Fantom language)
Line 881: Line 881:
"]l:
"]l:
1[$13\>][$l;!1+]#%</lang>
1[$13\>][$l;!1+]#%</lang>

=={{header|Fantom}}==

<lang fantom>
class Main
{
static Void multiplicationTable (Int n)
{
// print column headings
echo (" |" + (1..n).map |Int a -> Str| { a.toStr.padl(4)}.join("") )
echo ("-----" + (1..n).map { "----" }.join("") )
// work through each row
(1..n).each |i|
{
echo ( i.toStr.padl(4) + "|" +
Str.spaces(4*(i-1)) +
(i..n).map |Int j -> Str| { (i*j).toStr.padl(4)}.join("") )
}
}

public static Void main ()
{
multiplicationTable (12)
}
}
</lang>


=={{header|Forth}}==
=={{header|Forth}}==