[VBScript] exercice tt con, jy arrive pas !!

Salut, la clé s'appelle Inbox...

--Qui va en mer pour son plaisir,
irait en enfer pour ses vacances

Bon, donc ton problème n'est pas la saisie :o)

Donc ton problème est de l'algorithmique :o) Deux solutions à mon avis:
Tu stockes tout petit à petit dans deux tableaux (un pour les femmes l'autres pour les hommes) dont tu fais la moyenne à la fin (plus la moyenne pondéré des deux) ou alors, plus tactique, tu fais la moyenne au fur et à mesure:

ageF=0
ageM=0
cptF=0
cptH=0
Demander Sexe
Demander Age
Si Sexe=F
     Si cptF>0
           cptF+1
           ageF=ageF*(cptF-1)/(cptF)+age*(1/cptF)
      sinon
            ageF=age
      fin si      
fin si
pareil pour les mecs
moyenne pondérée en fonction du nombre d'hommes et de femmes
affichage

Voilà, le plus important est que tu comprennes, c'est pour ça que j'ai tout laissé en "brut de décoffrage"...bon courage...

--Qui va en mer pour son plaisir,
irait en enfer pour ses vacances

Merci pour ton aide. J'ai finalement réussi à résoudre ce problème de bon matin ! Hier soir ça m'énervait alors j'ai laissé tomber.
Je donne la solution que j'ai trouvé, si ça peut aider quelqu'un :

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''Code
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

nb = inputbox("Combien y a t-il de stagiaires dans la section ?")
an = inputbox("Entrez l'année en cours :")

ComptF = 0
ComptH = 0
AgeF = 0
AgeH = 0

For i = 1 to nb

S = inputbox("Entrez le sexe du stagiaire n°" & i & ". (F / H)")
Naiss = inputbox("Entrez maintenant l'année de naissance du stagiaire n°" & i & " :")

Age = an - Naiss

If (S = "F") then
ComptF = ComptF + 1
AgeF = AgeF + Age
Else
ComptH = ComptH + 1
AgeH = AgeH + Age
End If

Next

MsgBox("Vous avez terminé la saisie des informations pour les " & nb & " stagiaires")

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'''' CALCUL DES MOYENNES ''''''
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

MoyF = AgeF / ComptF
MoyH = AgeH / ComptH
MoyenneGroupe = (AgeF + AgeH) / nb

MsgBox("La moyenne d'âge des femmes est de : " & MoyF)
MsgBox("La moyenne d'âge des hommes est de : " & MoyH)
MsgBox("La moyenne d'âge du groupe complet est de : " & MoyenneGroupe)

Voilà...

Lorraine Soudade

MOUARF!
Quel con je fais des fois, j'ai une nette tendance à faire mienne la devise du "pourquoi faire simple quand on peut faire compliqué" :o)