LISP...

zaki -  
 ouss -
bonjour a tous ...
Je ne pouvais pas résoudre le problème à ce sujet .... si vous pouvez ...aidez moi...

- Ecrire une fonction en LISP qui calcule le PGCD de deux entiers.
- Ecrire une fonction en LISP qui calcule le nombre d'occurrences d'un atome x dans une liste.

1 réponse

  1. ouss
     
    PGCD:

    (defun pgcd (N P) (cond
    ((< N P) (pgcd P N))
    ((eq N P) N)
    ((eq P 0) N)
    (t (pgcd (- N P) P))))
    0