100  PRINT "FLASH MEMORY LIFETIME CALCULATOR"
110  PRINT "ENDURANCE RATING OF DEVICE       ";
120  INPUT E
130  PRINT "CAPACITY OF DRIVE IN GIGABYTES   ";
140  INPUT G
150  PRINT "RESERVE CAPACITY IN PERCENT      ";
160  INPUT R
170  PRINT "BLOCKS PER SECOND FROM IOSTAT    ";
180  INPUT B
190  PRINT "FREE SPACE IN K FROM DF          ";
200  INPUT F
210  LET F1=F+G*R*10485.8
220  LET Y=(E/(B*3.15360E+07))*(F1/4)
230  PRINT "ESTIMATED LIFETIME IN YEARS:";Y
240  END