DATUM 16-1-1982) WEERSTANDEN6(14):U(" RODUCTION"s2" KUNT KIEZEN UIT:"<"W = WAARDEN-KLEUR"F"K = KLEUR-WAARDEN"P"B = BEREKENEN"Z"E = EINDE"d"EEF W KEUZE"nE$:E$""110s""xE$"W"180$E$"K"6205E$"B"1200DE$"E" L40a***************n(14): UITSLUITEND INTEGERS INVOEREN"***** Š":" *****"8)" RODUCTION ":1"IT PROGRAMMA BEREKENDUIT WEERSTANDWAARDEN"O"DE: !":"ITSLUITEND GEHELE":"GETALLEN INVOEREN!""":"EEF WEERSTANDWAARDE"VV((V)):V$(V):L(V$)"E$(V$,2):F$(V$,3),A(E$):B(F$):DB10A16F$(D1):E$(A1):IL27@LJJ1(E$):K$:VTE$K$\^qhJ1(F$):K$:{rF$K$|J$(V$,3):J(J$)H1J:K$:J$K$:(142)"KLEURCODE VOOR ";V440:500A$" "(165):"":A$:A$"B$" "(111)(112):B$5C$"  ":C$RB$" "(165)(167):B$jC$:B$:C$:B$:C$B$" "(108)(186):B$:A$:A$:""4);"";E$4);"";F$4);"";J$4);"20% TOLERANTIE" & ZWART,BRUIN,ROOD,ORANJE,GEEL2 0 GROEN,BLAUW,VIOLET,GRIJS,WIT,OP[ :"NOG MEER WEERSTANDEN? (J/N)"n DE$:E$""580~ NE$"J"180 X 30 b ************** l(14): v DIT PROGRAMMA REKENT KLEURCODE'S  VAN WEERSTANDEN OM IN DE WAARDEN ""; 8)" RODUCTION":Q "**  ҠŠ **"} "EEF DE KLEURENCODE OPVIER KLEUREN;" "LS GEEN TOLERANTIE BEKEND IS GEEF DAN" "LS VIERDE KLEUR NEEN" " " "RUK OP DE PATIEBALK" E$:E$" "730@ (142);"GEEF DE KLEUREN:"I 440W ""k 4);:"1 ";A$ 4);:"2 ";B$ 4);:"3 ";C$ 4);:"4 ";D$ *X$A$:850 4AX:X$B$:850 >BX:X$C$:850 HCX:990 RX$"ZILVER"X2: \X$"GOUD"X1:0 fX$"ZWART"X0:F pX$"BRUIN"X1:[ zX$"ROOD"X2:r X$"ORANJE"X3: X$"GEEL"X4: X$"GROEN"X5: X$"BLAUW"X6: X$"VIOLET"X7: X$"PAARS"X7: X$"GRIJS"X8: X$"WIT"X9: 1060< J$(A):K$(B):J(J$K$):JJ10CT "" D$"NEEN"5)J;" OHM":5)"20% TOLERANTIE."::1140 D$"ZILVER"5)J;" OHM":5)"10% TOLERANTIE."::1140D$"GOUD"5)J;" OHM":6)"5% TOLERANTIE."::1140>D$"ROOD"5)J;" OHM":6)"2% TOLERANTIE."::1140zD$"BRUIN"5)J;" OHM":6)"1% TOLERANTIE."::1140$(14);"* Š *"." KUNT KIEZEN UIT:":8",,,"::",,,"::B",,,"::",,.":mL"4DE :,,":",,!!"V"RUK OP DE PATIEBALK"`E$:E$" "1120j650t"WILT U NOG MEER":"WEERSTANDEN WETEN(J/N)"~Q$:Q$""1150)Q$"J"Q$"N""ANTWOORD NIET BEGREPEN":11409Q$"J"740B 30V**************d(142):y DATUM 5-1-1982 HCC 26-32 WEERSTANDSBEREKENINGE$:E$"OP"1245LG1:HG1E7WR12: 10,12,15,18,22,27,33,39,47,56,68,82(WKWR1:W(WK): Z1 WR: W(Z)::W(WK)W(1)10n "VERVANGINGSKOMBINATIES""'+'=SERIESCHAKELING""'/'=PARALLELSCHAKELING"("'K'=KILO-OHM"2"'M'=MEGA-OHM":<"BIJ INVOER IS 'K'"F"EN 'M' TOEGESTAAN":$P"GEWENSTE WEERSTAND": R$@ZE1:S$"": Z1 (R$)QdE$(R$,Z,1)mn E$"K" E$".":E1E3x E$"M" E$".":E1E6S$S$E$:R(S$)E: RLG RHG 1820ALG10:N0:GR"DE BESTE KOMBINATIES" "VOOR "R$"-OHM ZIJN:":&" R1 R2 R VERVANG."C""OALG10i RA1 WR:XAW(RA) XR2.1 XR 1660 XR NN1: N1 GR: 1670: 1480 XR2.1 1670: 1820BLG100: N0 VVRX: 1550VV1(R1X)%VVVV10:BB10: VVLG 1550? RB1 WK:YBW(RB)X" XHG YHG 1660q, N0 VXY: 16006V1(1X1Y)@Q(RV)J QG GQ:I0T QG II1:R(I,1)X:R(I,2)Y:R(I,3)V:TQ^ RBh N1 YX 1660r N1 BB10: 1560&| RA:AA10: 1490G K1 I: M1 3:LR(K,M)a L1E3 L;: 1750 L1E6 R$(L1E3):F$"K": 1710R$(L1E6):F$"M"S$"": Z1 (R$)E$(R$,Z,1) E$"." E$F$:F$""S$S$E$: Z: S$F$; N1 M1 6)"+";4 N1 M1 6)"/";J M2 13)"=";T M:mTL(T1E4R.5)1004)"AFWIJKING:"TL"%": K:"NOG EEN WEERSTAND(J/N)"&A$:A$""18300A$"J"1290:30