4 INPUT v
5 CLS
6 A = 1
10 OPEN "r", 1, "NUL"
20 A = A * 1.002
25 PRINT (A)
26 PRINT VAL("&O" + STR$(A))
30 A% = A
40 GOTO 20