TBC *** TESZT 2 *** FELELTETOC2000GC ***Eszes Zoltan Petervasara,1985 ***PCN,K`C#N100:K100C(N$(N),P(K,1),G(K,4),EP(4,2)C*1,2,3,4,5C,I04:EP(I,0):C2"Altalanos TESZT-lapos felelteto"D<:"ALKALMAS BARMILYEN FELELET KIVALASZTASOS ELLENORZESHEZ!"DF"A TANARNAK TOVABB CSOKKENTI A MUNKAJAT,UGYANIS A MASODIK VALTOZATBAN AZ ALAPADATOK BEGEPELESE UTAN CSAK IRANYITANI KELL A TANULOKAT."DP500^EZ"A KET VALTOZAT: 1- MINDEN TANULO KITOLTI A FELADATLAPOT(ODAHAZA,VAGY AZ ORAN) - A TANAR PEDIG A NEKI ALKALMAS IDOBEN BETAPLALJA AZ EREDMENYEKET,MAJD SZUKSEG SZERINT ELEMZI AZOKAT"gEd500En" 2- EZ A VALTOZAT IDO ES ESZKOZTAKAREKOS: - UGYANIS ELEGENDO EGYETLEN FELADATLAP,AMIVEL TETSZOLEGES SZAMU TANULOT FELELTETHETUNK:"Fx" - A TANULOK EGYMAS UTAN LEULNEK A SZAMITOGEP ELE ES NINCS MAS FELADATUK,MINT A MEGADOTT IDON BELUL LENYOMNI AZ ALTALUK HELYESNEK TARTOTT VALASZ SORSZAMANAK MEGFELELO BILLENTYUT!"F500G"VALASSZON TEHAT: 1 - ELORE KITOLTOTT FELADATLAPOK ERTEKELESE, 2 - FELADATLAPOS FELELTETES"HG::"GEPELJE BE AZ '1',VAGY A '2' BILLENTYUT!"\GV:V1V2150vGV600,1000:V1ʑ810G:"MOST MAR MINDEN EGYUTT VAN! A KOVETKEZOKET TUDOM SZOLGALTATNI:"G500:300G"Gepelje be a kivalasztott szamot!" HV:V1V7200.H:V835,890,880,480,430,350,2507H190H:"ORULOK,HOGY SEGITHETTEM!"::::"* V IS Z O N T L A T A S R A *"HH,: * MENU */I6" 1-KIIRAS BEOLVASASI SORRENDBEN (csak elsore!), 2- NEVSOR SZERINT RENDEZVE, 3-PONTSZAMOK SZERINT RENDEZVE, 4-ERDEMJEGYEK ES PONTSZAMOK ATLAGA,"I;"5-ERDEMJEGYEK MEGOSZLASA(db,%), 6-AZ EGYES KERDESEKRE ADOTT HELYES VALASZOK(db es %), 7- V E G E (csak ha mar semmire nincs szukseg!"I@IE*OSZTALYOZAS*IFI0N1JHP(I,0)EP(4,1)P(I,1)5:EP(4,2)EP(4,2)1:338KJJP(I,0)EP(3,1)P(I,1)4:EP(3,2)EP(3,2)1:338JLP(I,0)EP(2,1)P(I,1)3:EP(2,2)EP(2,2)1:338JNP(I,0)EP(1,1)P(I,1)2:EP(1,2)EP(1,2)1:338JPP(I,1)1:EP(0,2)EP(0,2)1JRIJTK^ **HELYES VALASZ ERTEKELO **EKh"-A KERDESEK -A HELYES VALASZOK: SORSZAMA: SZAMA: %-A:"XKrI0K1:LL1K"##";I1;:".";:12);G(I,3);:22);100(G(I,3))NKL10L0:410:K:K"Nyomj meg egy billentyut, ha folytathatom a kiirast!"K""420:L **ERDEMJEGYEK MEGOSZLASA **(LI04{LSZEP(I,2)N100:EP(I,0);"-ERDEMJEGY:";:"##";EP(I,2);:" db ";:"##.##";SZLLL ** ERDEMJEGYEK ES PONTSZAMOK ATLAGA **LGY0:OP0LI0N1LOPOPP(I,0)::APOPN:SZAPMP100"MI04:GYGYEP(I,0)EP(I,2)::EAGYNBM"AZ ERDEMJEGY ATLAG: ";EAlM:"AZ ATLAGPONTSZAM: ";AP;" PONT"M:"-EZ MEGFELEL: ";SZ;" %-NAK,"M:"MIVEL A MAX. PONTSZAM:";MPMM:"Nyomj meg egy billentyut!"M""510::NX: * 1. VALTOZAT *.Nb"KEREM A KOVETKEZOKET:"HNl"A TANULOK SZAMA:";NdNv:"A TANULOK NEVSORA:"qNI0N1NI1;".tanulo:";:N$(I)NN:"A KERDESEK SZAMA:"NKN:"MOST KERDESENKENT KEREM A KOVETKEZOKET:"NI0K1OI1;".KERDES:"4O"-A HELYES VALASZ SORSZAMA :";:G(I,1)aO"-A HELYES VALASZ PONTERTEKE:";:G(I,2)gOO:"A FELADATLAPRA ADHATO MAXIMALIS PONTSZAM:";:MPO:"ES MEG KEREM AZ EGYES ERDEMJEGYEK ELERESEHEZ SZUKSEGES LEGALACSONYABB PONTSZAMOKAT:" P I411.PI1;" erdemjegyhez:";:EP(I,1)4P :P%fP*:"HAT AKKOR NEZZUK A FELADATLAPOKAT!"P4" TANULONKENT KEREM A FELADATLAP MINDEN KERDESENEL BEGEPELNI A TANULO ALTAL BEJELOLT VALASZ SORSZAMAT!"P>500:920:QC * BEIRASI SORRENDBEN * QH:L0QMI0N1:LL1dQR"##";I1;:".";:"% %";N$(I);:"###";P(I,0);P(I,1)yQWL10L0:865:Q\I:Qa:"Nyomj meg egy billentyut, ha folytathatom a kiirast!"Qf""870:Qp * NEVSOR SZERINT *QuP1:900:Rz * PONTOK SZERINT *"RP0:900:5R * RENDEZES *BRI0N2QRJI1N1R(PP(J,0)P(I,0))(PN$(I)N$(J))SP(J,0):P(J,0)P(I,0):P(I,0)S:S$N$(J):N$(J)N$(I):N$(I)S$:CP(J,1):P(J,1)P(I,1):P(I,1)CRJ,I:835:S ** TANULOI VALASZOK **SI0N1;S:N$(I);"-feladatlapjanak valaszai:"HSJ0K1xSJ1;".kerdesre adott valasz sorszama:";:VSVG(J,1)P(I,0)P(I,0)G(J,2):G(J,3)G(J,3)1SJ,IS325:S:* 2.VALTOZAT *S600S:* IDONORMAZAS *3T"KEREM AZ EGYES KERDESEKRE ADOTT IDOT MASODPERCEKBEN:"@TI0K1fT"##";I1;:".KERDESRE:":G(I,4)lT$U.:"A FELADATMEGOLDAS MENETE: -A TANULO LEUL A GEP ELE -A SORBAN MEGJELENO KERDESSZAMOK UTAN BEIRJA AZ ALTALA HELYESNEK TARTOTT VALASZ SORSZAMANAK MEGFELELO BILLENTYUT,"#U8500UB"-MINDEN KERDESRE A KEPERNYON JELZETT IDO ALL RENDELKEZESRE, -AZ UTOLSO 5 MASODPERCET EGY HANG JELZI, -HA A TANULO NEM VALASZOL, A GEP AUTOMATIKUSAN HELYTELEN VALASZT TAROL,"UL500UVV"-MINDEN VALASZNAL VISSZAJELZEST KAP A TANULO, -A FELADATLAP MEGOLDASA UTAN PEDIG KIIROM AZ OSSZPONTSZAMAT IS!"xV`:"Hat akkor: MINDENT BELE!!"Vj500V~:T0N1V:"Kedves ";N$(T):"Ha kezdhetjuk:":500V:J0K1'W:J1;".KERDES: -A MEGOLDASRA ADOTT IDO: ";G(J,4);"SEC."::"-A VALASZOD SORSZAMA ?"=WI40G(J,4)01^W@66415,I40;:28);"SEC."{WV$:V$""ʑ1300:1240WI200ʑ1350WIWJW:"Az osszpontszamod: ";P(T,0);" PONT"W:"VISZONTLATASRA!":I0500:IW:TW325X jXI(V$):IG(J,1)ʄ:"*** BRAVO *** A VALASZOD HELYES!":P(T,0)P(T,0)G(J,2):G(J,3)G(J,3)1:1320X:"SAJNOS A VALASZOD HELYTELEN!!"X(I0600:::XF * HANG *XP163,1,74,1,20,1,0,63,10,10,10,0,0,0,0,0XZYdHM%015:31,HM%:HK%:30,HK%:HM%Yn31,7:30,561YxIT0350:ITBY31,7:30,63HY