C06 dolgozat, 2009.01.13.
Papíron
1. feladat
Mit csinál a következő eljárás?
eljárás valami :x
hak :x=1
[eredmény :x]
[
kiír :x
hak (maradék :x 2)=1
[eredmény valami 3*:x+1]
[eredmény valami :x/2]
]
vége
Mit ír ki a következő hívás esetén?
2. feladat
Mit csinál a következő eljárás?
eljárás másvalami :lista
HAK (ELEMSZÁM :lista)=1
[EREDMÉNY :lista]
[
HAK (ELSŐ :lista) = (ELSŐ ELSŐNÉLKÜLI :lista)
[EREDMÉNY másvalami ELSŐNÉLKÜLI :lista]
[EREDMÉNY ELSŐNEK ELSŐ :lista másvalami ELSŐNÉLKÜLI :lista]
]
vége
Mit ír ki a következő hívás esetén?
kiír másvalami [2 3 4 4 4 5 5 1 2 6 6]
Gépen
1. feladat
Írj eljárást, ami eldönti egy listáról, hogy van-e 42-nél nagyobb eleme!
2. feladat
Írj eljárást, ami összeadja a páratlan négyzetszámokat valamilyen :k korlátig!
3. feladat
Írj eljárást, ami megadja, hogy hány negatív szám van egy listában!
