2 PRINT "RC CHARGING CIRCUITS (TIME VARIES FROM 0 TO 200)" 
4 PRINT "E=";
5 INPUT E
7 PRINT "R=";
8 INPUT R
10 PRINT "C=";
11 INPUT C
12 PRINT
14 PRINT "E(APPLIED)","T","R","C","E(C)"
16 FOR T=0 TO 60 STEP 5 
17 LET V=E*(1-EXP(-T/(R*C)))
18 PRINT E,T,R,C,V
20 NEXT T 
25 FOR T=80 TO 200 STEP 20
30 LET V=E*(1-EXP(-T/(R*C)))
33 PRINT E,T,R,C,V
35 NEXT T 
89 PRINT
90 PRINT "TYPE 'RUN' AND CHANGE VALUES OF E,R, AND C" 
99 END