Multiplication tables: Difference between revisions
Multiplication tables en Yabasic
(Multiplication tables en BASIC256) |
(Multiplication tables en Yabasic) |
||
Line 6,896:
12| . . . . . . . . . . . . . . . . . . . . . . 144
</pre>
=={{header|Yabasic}}==
{{works with|QBasic}}
<lang freebasic>print " X| 1 2 3 4 5 6 7 8 9 10 11 12"
print "---+------------------------------------------------"
for i = 1 to 12
nums$ = right$(" " + str$(i), 3) + "|"
for j = 1 to 12
if i <= j then
if j >= 1 then
nums$ = nums$ + left$(" ", (4 - len(str$(i * j))))
end if
nums$ = nums$ + str$(i * j)
else
nums$ = nums$ + " "
end if
next j
print nums$
next i</lang>
=={{header|zkl}}==
| |||