PARALLEL RESISTORS.bas <¬<®§9<³N % TEXTSmBa `@_ d@_ H SŽ Main a/ fÚ Fø2 ´Š G}† ´ŠP¢ a a fÚ Fø2 ´ž GéÆ a GéŽ' PARALLEL RESISTORS.bas ? CAT(87); 2 INPUT "Resistor or Enter"; r IF r=0 GOTO 1 FI s=1/r+s e=1/s ? "Re = ";ROUND(e,1); " Ohms" GOTO 2 1 END D
PARALLEL RESISTORS.bas <¬<®§9<³N % TEXTSmBa `@_ d@_ H SŽ Main a/ fÚ Fø2 ´Š G}† ´ŠP¢ a a fÚ Fø2 ´ž GéÆ a GéŽ' PARALLEL RESISTORS.bas ? CAT(87); 2 INPUT "Resistor or Enter"; r IF r=0 GOTO 1 FI s=1/r+s e=1/s ? "Re = ";ROUND(e,1); " Ohms" GOTO 2 1 END D
|
|
|
|
|