Rekurzívne prechádzame zoznam, kým nenarazíme na význačný prvok, potom vrátime zvyšok (a to je napravo od význačného prvku).

(defun PRAVA-STRANA (zoz sv)
 (cond ((null zoz) NIL)
       ((equal sv (first zoz)) (rest zoz))
       (T (PRAVA-STRANA (rest zoz) sv))
 )
)

; Príklady:
(PRAVA-STRANA '(1 2 3 4 5) 3) ; -> (4 5)
(PRAVA-STRANA '(1 2 3 4 5) 7) ; -> NIL

Autori

[ ZADANIE | AKO ZAČAŤ | RIEŠENIE ] Posledná aktualizácia 4. 9. 2001