11 lines
255 B
Text
11 lines
255 B
Text
printf(1," | ")
|
|
for col=1 to 12 do
|
|
printf(1,"%4d",col)
|
|
end for
|
|
printf(1,"\n--+-"&repeat('-',12*4))
|
|
for row=1 to 12 do
|
|
printf(1,"\n%2d| ",row)
|
|
for col=1 to 12 do
|
|
printf(1,iff(col<row?" ":sprintf("%4d",row*col)))
|
|
end for
|
|
end for
|