[VBScript] exercice tt con, jy arrive pas !!
Fermé
th4k
-
25 janv. 2005 à 15:05
teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 - 26 janv. 2005 à 09:19
teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 - 26 janv. 2005 à 09:19
A voir également:
- [VBScript] exercice tt con, jy arrive pas !!
- Comment trouver la correction d'un exercice - Forum Programmation
- Exercice informatique cm2 pdf ✓ - Forum Études / Formation High-Tech
- Triangle des textures exercice corrigé - Forum Loisirs / Divertissements
- Line con 0 - Forum Réseau
- Exercice word gratuit avec corrigé - Forum Word
4 réponses
teebo
Messages postés
33491
Date d'inscription
jeudi 14 octobre 2004
Statut
Modérateur
Dernière intervention
24 février 2011
1 793
25 janv. 2005 à 15:07
25 janv. 2005 à 15:07
Salut, la clé s'appelle Inbox...
--Qui va en mer pour son plaisir,
irait en enfer pour ses vacances
--Qui va en mer pour son plaisir,
irait en enfer pour ses vacances
teebo
Messages postés
33491
Date d'inscription
jeudi 14 octobre 2004
Statut
Modérateur
Dernière intervention
24 février 2011
1 793
25 janv. 2005 à 15:29
25 janv. 2005 à 15:29
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:
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
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
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
teebo
Messages postés
33491
Date d'inscription
jeudi 14 octobre 2004
Statut
Modérateur
Dernière intervention
24 février 2011
1 793
26 janv. 2005 à 09:19
26 janv. 2005 à 09:19
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)
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)
25 janv. 2005 à 15:11
j'ai deja ecrit ça, mais jai limpression de faire fausse route :
nb = inputbox("Combien y a t-il de stagiaires dans la section ?")
an = inputbox("Entrez l'année en cours :")
For i = 1 to nb
sexe = inputbox("Entrez le sexe du stagiaire n°" & i & ". (F / H)")
If (sexe = "F") then
??