1 1 REM :: THIS PROGRAM COMPUTES HOW MANY TIMES YOU HAVE TO FOLD 2 2 REM :: A PIECE OF PAPER SO THAT IT IS TALLER THAN THE 3 3 REM :: SEARS TOWER. 4 4 REM :: S = HEIGHT OF TOWER (METERS) 5 5 REM :: T = THICKNESS OF PAPER (MILLIMETERS) 6 10 LET S = 442 7 20 LET T = 0.1 8 30 REM CONVERT T TO METERS 9 40 LET T = T * .001 10 50 LET F = 1 11 60 LET H = T 12 100 IF H > S THEN 200 13 120 LET H = 2 * H 14 125 LET F = F + 1 15 130 GOTO 100 16 200 PRINT "NUMBER OF FOLDS ="F 17 220 PRINT "FINAL HEIGHT ="H 18 999 END 19
