Multiplication tables: Difference between revisions

Multiplication tables en BASIC256
(Multiplication tables en True BASIC)
(Multiplication tables en BASIC256)
Line 1,488:
220 PRINT
230 NEXT</lang>
 
=={{header|BASIC256}}==
<lang freebasic>print " X| 1 2 3 4 5 6 7 8 9 10 11 12"
print "---+------------------------------------------------"
 
for i = 1 to 12
nums$ = right(" " + string(i), 3) + "|"
for j = 1 to 12
if i <= j then
if j >= 1 then
nums$ += left(" ", (4 - length(string(i * j))))
end if
nums$ += string(i * j)
else
nums$ += " "
end if
next j
print nums$
next i</lang>
 
=={{header|Batch File}}==
2,122

edits