Minuscule fonction récursive en scheme
marina
-
cmin -
cmin -
Bonjour,
j'ai écrit une fonction qui calcule la somme des entiers entre m et n inclus , en scheme , la voici :
(define (somme-entiers-m-n m n)
(if (and (> m 0) (> n 0))
(if (<= m n)
(+ n (somme-entiers-m-n m (- n 1)))
"erreur")
0)
)
Il y a quelque chose que je comprends pas , si j'exécute la fonction pour les valeurs :
> (somme-entiers-m-n 1 3)
6
tout marche bien , mais si je fais :
(somme-entiers-m-n 3 8)
. +: expects type <number> as 2nd argument, given: "erreur"; other arguments were: 3
Ca n'a pas de sens car j'ai aucun probleme de parenthèse et la récursivité m'a l'air bonne , quelqu'un a une idée du probleme ?
merci
j'ai écrit une fonction qui calcule la somme des entiers entre m et n inclus , en scheme , la voici :
(define (somme-entiers-m-n m n)
(if (and (> m 0) (> n 0))
(if (<= m n)
(+ n (somme-entiers-m-n m (- n 1)))
"erreur")
0)
)
Il y a quelque chose que je comprends pas , si j'exécute la fonction pour les valeurs :
> (somme-entiers-m-n 1 3)
6
tout marche bien , mais si je fais :
(somme-entiers-m-n 3 8)
. +: expects type <number> as 2nd argument, given: "erreur"; other arguments were: 3
Ca n'a pas de sens car j'ai aucun probleme de parenthèse et la récursivité m'a l'air bonne , quelqu'un a une idée du probleme ?
merci
A voir également:
- Minuscule fonction récursive en scheme
- Fonction si et - Guide
- Code ascii de a minuscule - Guide
- Majuscule en minuscule - Guide
- E accent minuscule - Guide
- Fonction miroir - Guide