(defun BykElmtGnjl (L)     ====> List
          (cond     ((null L)  0)
                        ((oddp (firstelmt L))  (+ 1 (bykElmtGnjl  (cdr L))))     ==> Rekursif dengan penambahan 1 untuk setiap elemen ganjil
                        (t  (BykElmtGnjl (tail L)))                                            ==> Kondisi default
          )
)
0 comments:
Post a Comment