Y$" "2140%Ap39:7,0:WTjLpAYhÉgo|gxG>S5Jʙ9v" GSљ e͘w>{  î ER ! 6 REBASIC RUN D.M." ." 0g1 51,5A__ 490000  0,31,0,39: 6,1: *:::::O " 1X1 - UEBUNG 1":t( " ROEMISCHE ZAHLEN 2":2 " PRIMZAHLEN 3":< " PRIMFAKTOREN 4":F " KGV UND GGT 5":P " POTENZEN UND WURZELN 6":-Z " RECHTECKBERECHNUNG 7":Rd " KREISBERECHNUNG 8":wn " PROZENTRECHNUNG 9":x " ": " END E": " ":!" WEITER ";(137);"  ` 1989 D.M." *430O (29,5);"WAS WIRD GEWUENSCHT?"cY$:Y$""180sY$"1"570Y$"2"2260Y$"3"970Y$"4"1090Y$"5"1310Y$"6"1520Y$"8"1800Y$"7"1680Y$"9"310 Y$" "180"Y$"E"1803006,0,31,0,39:7,0::>6:d@:" *****PROZENTRECHNUNG*****"rJ::::T" PROZENTSATZ 1":^" PROZENTWERT 2":h" GRUNDWERT 3":r" HAUPTMENUE Z":|X$:X$""380'X$"1"19308X$"2"2040IX$"3"2150]X$"Z"38010s 1,3,2,37:6,2:{W1T$"MATHEMATIK MIT DEM COMPUTER "L(T$) (2,3);"*" (2,36);"*" (2,5);T$ WA$(T$,1,1) T$(T$,2,L1)A$ Y$*  Y$""490< & Y$" "490S 029,30,0,39:7,0:j :0,31,0,39: 6,2: D:" 1 X 1 -TRAINING" N X" *********************": b"BIS ZU WELCHER ZAHL MOECHTEN SIE UEBEN?";Z l: v"LOESEN SIE BITTE FOLGENDE AUFGABEN:" " P0 1  I1 12E X((Z1)(2))Y Y((Z1)(3))u " ";X;"*";Y;"=";}  E  EXY 740 :"RICHTIG" 820 :"FALSCH" PP1  P 820,820,770,790,810,820,820,810,790,820,820,820" "ETWAS MEHR KONZENTRATION BITTE"+ 820C "BESSER AUFPASSEN"L 820v *"NUN NEHMEN SIE SICH ABER ZUSAMMEN!"| 4 > I H: R P1 860,890,890,910,910,910,930,930,930,930,930,930 \"AUSGEZEICHNET! SIE KOENNEN SICH" f"GROESSERE ZAHLEN ZUTRAUEN." p950- z"DAS WAR GUT."6 950] "BEFRIEDIGENT;SIE SOLLTEN UEBEN."f 950 "DAS WAR KEINE HELDENLEISTUNG.UEBEN" "SIE MIT KLEINEREN ZAHLEN." ::"MOECHTEN SIE WEITER UEBEN ? (J/N) Y$:Y$"J"570ԊY$"N"96010  PROGRAMM PRIMZAHLEN& :>  12);"PRIMZAHLEN"I :: h " Primzahlen bis: ";N::z  Z5 N 2  T3 (Z) 2 WZT  W(W) Z:1070 $ : Z,: .::"NOCHMAL ? (J/N)"8Y$:Y$"J"980ԊY$"N"108010%B PROGRAMM 2 FAKTORENZERLEGUNG-L:TV 5)"Jede von Ihnen gew{hlte na-"{` 5)"t}rliche Zahl wird in ihre "j 5)"Primfaktoren zerlegt"t::~ "Geben Sie eine Zahl ein:";Z:: Z0 1280 (Z);Z (Z)  I2 ZE0* (ZI)ZI 1240@ZZI:EE1:1220P E0 1260d 10);E;"*";I;t Z1 1280| I:: " W}nschen Sie weitere Zahlen ? (J/N)"Y$:Y$"J"1150ԊY$"N"130010 PROGRAMM 3 KGV und GGT(:,2: 4);"Dieses Programm berechnet das":\<"kleinste gemeinschaftliche Vielfache KGV"F"und den gr|~ten gemeinsamen Teiler GGT"P 6);"zweier nat}rlicher Zahlen"Z::d "ERSTE ZAHL : "; N1n "ZWEITE ZAHL: "; N2 ::x N1N2 MAN2:MIN1: MAN1:MIN2* I1 MI8QIMAMIK Q(Q) 1460S I]II1tKGVIMA: GGTMII 7);"KGV(";N1;",";N2;")=";KGV: 7);"GGT(";N1;",";N2;")=";GGT::"Suchen Sie weitere Zahlen? (J/N)"Y$:Y$"J"1320ԊY$"N"1510108 PROGRAMM 4 POTENZEN WURZELN@:k "In diesem Programm berechnet Ihnen" "der Computer die 2.u.3.Potenz sowie"  "die Quadratwurzel gew}nschter Zahlen""::, "KLEINSTE GEWUENSCHTE ZAHL:";K:#6 "GROESSTE GEWUENSCHTE ZAHL:";G:::W@A$"ZAHL":B$"QUADRAT":C$"KUBIK":D$"WURZEL":{J 2);A$;7);B$;15);C$;24);D$T ZK G^ 1);Z;6);ZZ;14);ZZZ;23);(Z)h Z ::r"WERDEN WEITERE ZAHLEN GEWUENSCHT? (J/N)"|Y$:Y$"J"1520ԊY$"N"166010/ PROGRAMM 5 RECHTECK7:b"Aus den Seitenl{ngen wird berechnet""Umfang und Fl{che des Rechtecks""sowie die L{nge der Diagonalen"::: "SEITE a=";A "SEITE b=";B: "UMFANG ="; 2(AB): "FLAECHE ="; AB8: "DIAGONALE ="; (A2B2)F::::r"WEITERE RECHTECKE GEWUENSCHT ? (J/N)"Y$:Y$"J"1670ԊY$"N"179010 PROGRAMM 6 KREIS/KUGEL:" Dieses Programm berechnet nach" &" Eingabe des Radius"50" Umfang, Kreisfl{che u. Kugelvolumen"?:::^D" RADIUS ="; RN"UMFANG DES KREISES ="; 2ǮRX"FLAECHE D. KREISES ="; ǮRRb" VOLUMEN DER KUGEL ="; ǮRRR43l::::v"WEITERE RADIEN GEWUENSCHT ? (J/N)"+Y$:Y$"J"1800ԊY$"N"192010H PROGRAMM 7 PROZENTSATZQ: :: "*** BERECHNUNG DES PROZENTSATZES ***":: "Prozentwert :";W : "Grundwert :";GP100WG ::7);W;"von";G;"=";P;"%":::+"WEITERE PROZENTSAETZE GEWUENSCHT ? (J/N)"RY$:Y$"J"1940ԊY$"N"203010nPROGRAMM 8 PROZENTWERTv: :: "<<< BERECHNUNG DES PROZENTWERTES >>>"::  "Prozentsatz in % :";P :* " Grundwert :";G4WPG100 ::>7);P;"%";"von";G;"=";W)H:::XR"WEITERE PROZENTWERTE GEWUENSCHT ? (J/N)"\Y$:Y$"J"2040ԊY$"N"214010fPROGRAMM 9 GRUNDWERTp:z::"### BERECHNUNG DES GRUNDWERTES ###":: "Prozentsatz in % :";P : " Prozentwert :";W)G100WP ::I"Der Grundwert betr{gt ";GU:::"WEITERE GRUNDWERTE GEWUENSCHT ? (J/N)"Y$:Y$"J"2150ԊY$"N"225010 ROM$(13),DEC(13)2510 I113 ROM$(I),DEC(I) ::+ :" ** UMWANDLUNG VON DEZIMALZAHLEN **"Z :" ** IN ROEMISCHE ZAHLEN **"$ ::" EINGABE EINER NATUERLICHEN". :" ZAHL ZWISCHEN 1 UND 4999 :"8 : DECB DEC4999 DEC1 DEC(DEC) 2340L 2430V ::" DARSTELLUNG ALS ROEMISCHE ZAHL :"+` :" ";ROM$Pj ::" NOCH EINE ZAHL ? (J/N)"wt Y$:Y$"J"2360ԊY$"N"242010~ ROM$"" I113 DECDEC(I)2490 ROM$ROM$ROM$(I) DECDECDEC(I) 2450   M,1000,CM,900,D,500,CD,400" C,100,XC,90,L,50,XL,40? X,10,IX,9,V,5,IV,4,I,1WTjLpAYh