%d******************************In*** ***mx*** BELEG - MATHEMATIK ****** ****** von ROLAND LINKE ****** ****** MAI 1990 ***!*** ***E******************************i------------------------------ KOORDINATENSYSTEM------------------------------ 0,31,0,39:1,7: 22,28,3,36:7,1:::" Ich zeichne Ihnen das"#:" Koordinatensystem"K 16,120,303,120,1: 104,96,104,239 21,123,22,123: 19,122,22,122: 17,121,22,121 21,117,22,117: 19,118,22,118: 17,119,22,119" 297,123,298,123: 297,122,300,122: 297,121,302,121', 297,117,298,117: 297,118,300,118: 297,119,302,119_6 101,101,101,102: 102,99,102,102: 103,97,103,102@ 105,97,105,102: 106,99,106,102: 107,101,107,102J 101,233,101,234: 102,233,102,236: 103,233,103,238 T 107,233,107,234: 106,233,106,236: 105,233,105,238-^ (2,11);"Y": (19,10);"-Y"Ph (15,1);"-X": (15,37);"X"vr 167,117,167,123: (18,20);"PI"| 41,117,41,123: (18,4);"-PI" 230,117,230,123: (18,27);"2PI" 293,117,293,123: (18,35);"3PI"  I0 100 10  101,(110I),107,(110I)&  IH  (4,10);"10": (10,11);"5"n  98,170,110,170: 98,220,110,220  (17,12);"0" ------------------------------  FUNKTION Y=X*X ------------------------------  22,28,3,36:7,0:' ::" Ich zeichne Ihnen die Funktion"E &:" Y=X*X "T 0 I0 63_ :XI20l DYXX10 N 104I,120Y,0 X 104I,120Y b 230I,120Y l 230I,120Y v I  J63 45 1 XJ20 YXX10  (293J)63,120Y  ( 41J)63,120Y!  JI  (1,20);0,7;" FUNKTION : Y=X*X "^  (3,27);"fuer"y  (5,24);"-PI<=X<=PI" ------------------------------  FRAGESTELLUNG ------------------------------  22,28,3,36:7,1: ::" Anzahl der Glieder = ? ";AN.  AN1 980; RO(AN)O  ROAN 1000 ::" Fehlereingabe, 5 sec. Pause": 50: 900 ------------------------------  FOURIERREIHE ------------------------------  22,28,3,36:7,4:% :" Ich zeichne Ihnen die Kurve"L :" der Fourierreihe fuer "n :" ";AN;" Glieder"  AN1 20,153,300,153,23: 3000  I0 63  2000 V 104I,Y120,23 ` 104I,Y120 j 230I,Y120 t 230I,Y120~ I I63 45 1" 20009 (293I)63,120YP ( 41I)63,120YX Ic 3000------------------------------ FORMEL DER FOURRIERREIHE------------------------------YA0X(I2.857)ǯ180 Z2 AN% YAYA((((Z1)X))((Z1)2)((1)Z))- ZA Y(3.34YA)10G*k ------------------------------ MENUE ------------------------------ 22,28,3,36: 7,1: :"==== FERTIG fuer ";AN;" Glieder ====" " Taste S = Startet Programm"8 :" Taste E = Ende Programm"P T$: T$"" 3070d T$"E" 3200w T$"S" 100 :::" Eingabefehler, 5 sec. Pause"& 50 : 3000 0,31,0,39:: (15,8);"P R O G R A M M E N D E""S" 100 ::