Debutant prob iteration en caml

Utilisateur anonyme -  
KX Messages postés 19031 Statut Modérateur -
Bonjour,
let prodit tab1 [|6;3;5|] ;;

let prodit ta = let p = ref 1 and
n =(vect_length to) in
For i = 1 to (n-1) do p:= !p * ta (i) done;
!p;;
prodit tab1 ;;

voila je ne comprend pas pourquoi cela ne marche pas
en recursif aucun probleme mais la je ne comprend pas
le probleme de l'iteration et du "valeur is unbound"est très récurrent chez moi
avec cette solution je pense que je reglerai mais autres problemes
(j'utilise caml light)

edit:
pareil pour

let somit tab1 [| 6;5;5;3|] ;;

let somit ta = let s = ref 0 and
n = (vect_length to) in
For i = 0 to (n-1) do s:= !s + ta (i) done;
!s ;;
somit tab1;;

il y a un probleme mais ou?
encore merci d'avance

5 réponses

Utilisateur anonyme
 
?? comment ca mauvais sujet?

Caml cest de la m§§§§§ vous dites?

vous avez bien raison mais j'ai pas le choix lol
1
KX Messages postés 19031 Statut Modérateur 3 020
 
let tab1=[|6;3;5|];;

let prodit tab =
let p = ref 1 and n =(vect_length tab) in
for i=0 to (n-1) do
p:= !p * tab.(i)
done;
!p;;

prodit tab1 ;;

let tab2=[|6;5;5;3|];;

let somit tab =
let s = ref 0 and n = (vect_length tab) in
for i=0 to (n-1) do
s:= !s + tab.(i)
done;
!s ;;

somit tab2;;
1
Utilisateur anonyme
 
up!
0
nEm3sis Messages postés 722 Statut Membre 113
 
mauvais sujet dsl
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
nEm3sis Messages postés 722 Statut Membre 113
 
en fai j'ai commencé a répondre et je me suis rendu compte que je ne connaissai pas le caml sous cette forme
alors j'ai annulé mais on peu pas supprimer
encore dsl
0