page-1983-101-timex-sinclair-programming-tricks

40 PRINT·"ORIGINAL AMOUNT$= n50 INPUT N60 LET R=INT(lOO*N+.5)/10070 CLS80 PRINT "TO THE NEAREST PENNY"90 PRINT "$";N;" IS $";R100 PRINT110 GOTO 1072 Mark UpMr. Storekeeper, here's just what you have needed tocompute mark ups. This program causes your TIMEX tofind the retail price for which your percentage off wouldgive the wholesale cost.For instance, if you got 40 percent off on an item andpaid $60, how much was it priced at, at retail? The answeris $100. To put that another way, if retail prica or suggestedretail price is $100 and you got 40 percent off atwholesale, what is the wholesale price? The answer is$60.Try $40 wholesale which is 60 percent off. Theanswer is $100 retail. Or try $10 wholesale at 90 percentoff. Retail would be $100. Or $75 wholesale at 25 percentoff gives $100 retail.Here's a toughie! Try $19.95 wholesale cost. Mark-uppercentage is 40. The correct retail answer is $33.25.Program Listing10 LET D=f,J20 LET R=f,J30 PRINT"WHOLESALE COST = $II;40 INPUT W50 PRINT wn •60 PRINT "MARK-UP PERCENTAGE = ,70 INPUT p80 PRINT p90 CLS92