1` *** PROGRAM TO COMPUTE SQUARE FOOTAGE FOR WALLPAPER ***P` *** CREATED 10-25-83u` *** UPDATED 10-25-83 ***`( FT = FEET`2 FTS = SQUARE FEET`< IN = INCHES`F INS = SQUARE INCHESaP ROLL = NUMBER OF SQUARE FEET OF PAPER IN A ROLLaZROLL'adROOM$"BEDROOM"fan "SQUARE FOOTAGE REQUIREMENTS FOR THE ";ROOM$;" WALLPAPERax " FT - IN FT(DEC) FT - IN FT(DEC) SUB TOTAL CUM TOTAL"a a FTA,INA,FTB,INBa FTA laINADINA bINBDINB bFTADFTA INAD/bFTBDFTB INBDBbFTSSFTADFTBDUbFTSCFTSCFTSSb "###.## ";FTA,INA,FTAD,FTB,INB,FTBD,FTSS,FTSCb b 12,11,7,10b 15,5,7,10b 7,3,7,10b 3,0,1,1b 2,10,7,10b" 12,5,7,10c, 3,0,1,1cb 999,999,999,999Dcl "TOTAL NUMBER OF SQUARE FEET = ";FTSCcv "TOTAL NUMBER OF ROLLS REQUIRED FOR THE ";ROOM$;" = ";FTSCROLLc999Dcl "TOTAL NUMBER OF SQUARE FEET = ";FTSCcv "TOTAL NUMBER OF ROLLS REQUIRED FO