[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

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
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
bella
 
voici une série d'exercices de lisp avec les solutions
http://annaba.me/cours-et-exercices-de-calcul-formel-lisp/
0
emy-25
 
(defun pgcd (a b)
( if (null a) b
(null b) a
(if (> a b)(pgcd (( - a b)b))
(pgcd((-ba) a)))))
0