Elemen Genap List

Judul :
genap (L)
Definisi dan Spesifikasi :
genap : list of integer → integer
{ genap(L) menghitung banyaknya angka genap dalam List }
Ralisasi :
Basis : jika list kosong 0
Rekurens: if (FirstElment L) genap, then + 1 genap (Tail L)
else genap (Tail L)
Aplikasi:
(genap ‘(1 2 3 4 5 6 7 8 9))
4


(defun genap (L)
(cond ((null L)0)
((evenp(car L))(+ 1 (genap(cdr l))))
(t(genap(cdr L)))
)
)

genaph

7,727 thoughts on “Elemen Genap List