9. feladat:

Az iskol ban egy list ban leĄrt k, hogy ki milyen oszt lyzatokat
kapott f‚l‚vkor. Az adatok tant rgy szerint csoportosĄtva kerltek
a list ba. Nem minden di k tanulta ugyanazokat a t rgyakat.
- Az adatok t rgyank‚nt (n‚v, jegy) p rokban vannak megadva.
Pl.: [[matek [S ri 2][Feri 4]] [fizika [S ri 3]]~
      ~[k‚mia [feri 3]] [t”rt‚nelem [Feri 2]] ]

A feladatok (amire kell a program)
a.)  tlagok :s - melyik t rgyb˘l milyen  tlagot ‚rtek el a tanul˘k
b.) legt”bben-tanult k :s - melyik t rgyat tanult k a legt”bben
c.) -> el‹ llĄtja a (n‚v, t rgy, jegy) h rmasokat


--- <a k˘dok, k˘dtervek > ---

A.)
tanuld  tlagok:s
(ha nemres:s akkor...)
 tlagF(els‹: els‹:s)                    ;  tlagF(els‹(els‹(s)))
 tlagok(els‹n‚lkli: s)
v‚ge

B.)
tanuld h nyantanult k:s
ha res:s akkor h nyantanult k=0
dbsz mol(0, els‹:s)                     ;dbsz mol(0,els‹(s))
h nyantanult k(els‹n‚lkli: s)
v‚ge

A2.)
tanuld  tlagF(mi, s)
(ha nemres:s akkor...)
ha mi<>els‹(els‹(s)) akkor  tlagF(mi, els‹n‚lkli(s))
kl.  tlag(els‹n‚lkli(els‹(s)))
v‚ge

tanuld  tlag :s :db  ; fv(s, db)
ha res(els‹n‚lkli(s))				; a "+" ut n az aktu lis...
  akkor atlag=( utols˘(els‹(s))+ tlag )/db	; ... ‚rt‚ket kellene betetetni
kl.  tlag=utols˘(els‹(s)) +  tlag(els‹ut niak(s), db+1)
v‚ge

B2.)
tanuld dbsz mol :dbsz :s  ; fv(dbsz, s)
ha res:s akkor dbsz mol=0
ha dbsz<=elemsz m(els‹(s))
  akkor dbsz mol( elemsz m(els‹(s)), els‹n‚lkli(s) )
kl. (dbsz mol(dbsz, els‹n‚lkli(s)))
v‚ge

tanuld elemsz m :s
ha res:s akkor elemsz m=0
kl. elemsz m=1+elemsz m(els‹n‚lkli(s))
v‚ge

C.)
tanuld c_foprogram :s 
ha nemres: s akkor
	; mondat (els‹(els‹(els‹ut niak(els‹(s)))), els‹(els‹(s)),~
    	;              ~els‹(els‹ut niak(els‹(s)))
mondat: els‹: els‹: els‹ut niak: s, els‹: els‹: s, els‹, els‹ut niak: els‹: s
	; ‚s a k”vetkez‹ sor is az "akkor"  gban van!
c_fopogram: els‹ut niak: s 	; c_foprogram (els‹ut niak(s))
v‚ge

---- < k˘dok v‚ge > ----

Megjegyz‚sek: 
- tesztesetek tov bbra sem voltak!
- a "C"  r‚szfeladathoz megadott k˘d CSAK a k”vetkez‹ eredm‚nyt adja:
[ [S ri matek 2][S ri fizika 3][Feri k‚mia 3][Feri t”rt‚nelem 2] ]
azaz minden bemen‹ egys‚gb‹l (tant rgyas blokkb˘l) csak az els‹ di kra fut le.


---- <v‚ge > ----