REM sales tax table for whole dollar amounts
REM sales tax is .0725
REM use title line and column heading to label output
REM use tab to center headings
REM dispaly dollar amt and tax figures for 1 to 15 dollars
REM sales tax table, list dollar amt on left, and tax on right.
next2 = 1
CLS
INPUT "How high do you want to enter your taxes"; yy
PRINT TAB(32); "Sales Tax Table"
PRINT
PRINT TAB(10); "Dollar Amount"; TAB(60); "Tax Amount"
PRINT
FOR x = 1 TO yy
tax = x * .0725
PRINT TAB(15); x; TAB(63); tax
NEXT x
INPUT "If you want to see this again using a do while loop touch any key, else enter -0"; next$


PRINT TAB(32); "Sales Tax Table"
PRINT
PRINT TAB(10); "Dollar Amount"; TAB(60); "Tax Amount"
PRINT
DO WHILE next2 <> 16
tax = next2 * .0725
PRINT TAB(15); next2; TAB(63); tax
next2 = next2 + 1
LOOP

END