for$i(@a=1..12){printf"%3d%s",$i*$_,$_>11?$/:$"for@a}