Bonjour,

J'ai reçu ceci comme exercice et étant débutant j'ai énormément de mal.

Créez une fonction effectuant la somme des N premiers nombres.

L'affichage du résultat se fera au moyen de la fonction Alert dont la syntaxe est la suivante :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
(Alert chaine_de_caractères)
Exemple : (Alert "Bonjour").

Pouvez vous m'aidez ?

Pour le moment j'ai ceci :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
(defun sommenpremiers (/ numero resultat)
    (setq numero (getreal "Valeur de N svp ?"))
    (setq resultat 0)
    (while (> numero 0)
        (progn
            (setq resultat (+ resultat numero))
            (setq numero (- numero 1))
            (setq resultat resultat)
        )
    )
)



Un grand merci d'avance.