[LISP] Pgcd

Jessica -  
 emy-25 -
Kikou all :))
voila je voudrais faire un programme donnant le pgcd de 2 nombres en Lisp,
tel que:
(pgcd 15 20)
->5
mais je n'arrive pas du tout à le faire, need help please ^^

4 réponses

  1. Jessica
     
    j'ais pense à ca mais ca ne marche pas, aidez moi svp:
    (defun pgcd (a b)
    (cond
    ((< a b) (pgcd a (-b a)))
    ((> a b) (pgcd (-a b) b))
    (t a)))
    0
  2. Maximilien DESMESTAIRE Messages postés 94 Date d'inscription   Statut Membre Dernière intervention   119
     
    Salut

    Pour la programmation formate bien le texte le Visual Lisp aide bien "VLISP" fait une table de variable parce que la variable "t" , pour ma part, je ne vois pas à quoi cela te sers.....

    A laisser votre OS en Administrateur
    vous en perdez vos cheveux :p
    0
  3. bella
     
    voici une série d'exercices de lisp avec les solutions
    http://annaba.me/cours-et-exercices-de-calcul-formel-lisp/
    0
  4. emy-25
     
    (defun pgcd (a b)
    ( if (null a) b
    (null b) a
    (if (> a b)(pgcd (( - a b)b))
    (pgcd((-ba) a)))))
    0