@B PRINT "SERIES CIRCUIT WITH 2 RESISTORS"@@@H PRINT "R1="; @@@I INPUT R1 @@@J PRINT "R2="; @@@K INPUT R2 @@@L LET R=R1+R2@@@O PRINT "R(TOTAL)=";R@@@P PRINT  @@@Q PRINT@@@T PRINT "E(APPLIED)","I=E/R","E1=I*R1","E2=I*R2" @@@Y FOR E=5 TO 40 STEP5@@@^ LET I=E/R@@@
 LET E1=I*R1@@@( LET E2=I*R2@@@2 PRINT E,I,E1,E2@@A$ NEXT E @@A/ PRINT@@A0 PRINT@@A1 PRINT "CHECK:  E(APPLIED)=E1+E2" @@A2 PRINT@@OT PRINT "TYPE 'RUN' AND INPUT VALUES FOR R1 AND R2"@@O' END@@
?@@X;%1@Y: IPYY%';&ID>(I@KD<(H>> *[H:< %/IPX:P>%;%': ID>