SC *****************!C * *=C * STATISZTIKA *YC * *uC *****************C KESZITETTE: PALL FERENCC HAJDUSZOBOSZLO,1983C C"TANULOK SZAMA,TANTARGYAK SZAMA? (MAX.34,34)C R,C D# R34 C34 : 20%D(A(R4,C4),B(C4,R4)2D2 I1 RjD<"IRD BE A";I;"TANULO ERDEMJEGYEIT(JAVITAS:-9 -EL)"~DFZ0:K0:T0:H0DP J1 CDZJ;". ";: A(I,J)D_ A(I,1)1 A(I,2)1 "HIBAS!": 90Dd A(I,J)9 60 En A(I,J)1 A(I,J)5 "HIBAS!":90Ep J!Es J3 CRExGA(I,C): * GYAK.JEGY *gE JC A(I,J)0EZZA(I,J): * ELM.JEGYEK OSSZEGE *EK(((Z(C3))10))10: * ELM. ATLAG *FT((((2KG)3)10))10: * TAN. ATLAG *F A(I,J)1 HH1 F J8F H0 200 : 210EFK1: T1UF G1 T1F"ELM.A.=";K,"GYAK.JEGY =";G,"TAN.ATLAG =";T;" ";ZFA(I,J)K:A(I,J1)G: A(I,J2)TF700F IF" E= ELLENORZES VAGY A=ATLAGOK" GX$: X$"E" 290 : 280#G X$"A" 356 : 2701G" I1 RCG' I;".";" ";SG, J1 C3mG6 X$"E" 320 : 215zG@A(I,J);GJ JGM" TOVABB?(T)"GTQ$: Q$"T" 350 : 340G^ IGd"TOVABB A T BILLENTYU BEUTESEVEL"Gh "T" 370 : 360Hr I1 C3/H|Z0:X10:X20:X30:X40:X50>H J1 RWH B(I,J)A(J,I): 415dHB(I,J);H B(I,J)1 X1X11 : 416H B(I,J)2 X2X21 : 417H B(I,J)3 X3X31 : 418H B(I,J)4 X4X41 : 419H B(I,J)5 X5X51 IZZB(I,J)I J)IK((10ZR))10@I K0 455 : 460LI: 470uI" ";I;". TANTARGY ATLAGA: ";KI"5:";X5;"DB";" 4:";X4;"DB";" 3:";X3;"DB";" 2:";X2;"DB";" 1:";X1;"DB"IT$: T$"T" 470 : 465I II"T?"JT$: T$"T" 500 : 480!J I1 R3J JC1 540CJ J1 C2UJ JC1 540qJ A(I,J)1 530 : 540J "BUKOTT";I;".";" TANULO ";J;". TANTARGYBOLJ JJ!T$: T$"T" 546 : 545J" IJ#"T?"K&T$: T$"T" 600 : 550KX I1 C3&K]M0:L0:F0:S04Kb J1 RXKl IC B(I,J)1 MM1 : 637K} IC1 B(I,J)1 LL1 : 638K~ IC2 B(I,J)1 FF1 : 639K IC3 B(I,J)1 SS1 : 640 K JL M0 I;". TANTARGYBOL BUKOTT ";M;" TANULO" : 646ZL L0 " ELM.-BOL BUKOTT: ";L;" TANULO" : 647L F0 " GYAK.-BOL BUKOTT: ";F;" TANULO" : 648L S0 " BUKOTT: ";S;" TANULO"L IHM"BUKOTT :";E1:"ELEGSEGES:";E2:"KOZEPES :";E3:"JO :";E4:"JELES :";E5:"KITUNO :"E6NMjM A RENDUSEGEK GYUJTESEM T1 E1E11 : 710M T2.7 T1 E2E21 : 720M T3.7 T2.7 E3E31 : 730M T4.7 T3.7 E4E41 : 740N T5 T4.7 E5E51 : 750 ,N T5 E6E612N