Probleme serieux,.. les maths
Fermé
martani
Messages postés
37
Date d'inscription
lundi 3 novembre 2008
Statut
Membre
Dernière intervention
4 avril 2010
-
12 nov. 2008 à 13:13
martani Messages postés 37 Date d'inscription lundi 3 novembre 2008 Statut Membre Dernière intervention 4 avril 2010 - 12 nov. 2008 à 13:16
martani Messages postés 37 Date d'inscription lundi 3 novembre 2008 Statut Membre Dernière intervention 4 avril 2010 - 12 nov. 2008 à 13:16
A voir également:
- Probleme serieux,.. les maths
- Sinequanone maths - Télécharger - Calcul & Conversion
- Formule maths - Télécharger - Études & Formations
- Photo maths pc - Télécharger - Études & Formations
- Qwik maths - Télécharger - Études & Formations
- Logiciel pour écrire cours de maths gratuit - Télécharger - Vie quotidienne
1 réponse
martani
Messages postés
37
Date d'inscription
lundi 3 novembre 2008
Statut
Membre
Dernière intervention
4 avril 2010
12 nov. 2008 à 13:16
12 nov. 2008 à 13:16
salut a tous voici l'algo su premier probleme mais il compte pas l'ordre c implementer en OCAML
voila et
i wish that help
let rec ajout a l= match l with []->[] |x::s->[a::x]@(ajout a s);; let rec enum n p= if n<=0 then [[]] else begin if p=[] then [] else begin let x::s=p in if x<=n then (ajout x (enum (n-x) p))@(enum n s) else enum n s end end;;
voila et
enum 4 [1;2]donne
[[2;2];[1;1;1;1];[1;1;2]];;
i wish that help