tirage "loto" staroffice

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : tirage "loto" staroffice

sebhal

de match

bonjour,

c'est la première fois que je poste sur pragorammation, j'espère ne pas commetre d'impair.
voilà mon probleme: j'ai préparé une feuille de calcul staroffice pour gerer les groupes d'IDD de mon collège. Elle marche très bien, sauf que par mon système les derniers groupes ont plus de chance d'avoir l'un des IDD préféré que les autres. je me suis donc dit "pas de probleme il suffit de tirer les groupes au sort".

sauf que voilà, je n'arrive pas à trouver une façon simple de tirer au hasard une suite d'entiers tous différents compris entre 1 et le nombre de groupes.

1) me suis je bien fait comprendre?
2) ma question a-t-elle sa place ici?
3) comment allez-vous?
4) avez vous une solution?

merci par avance.

Publicité

Trap D

Ce ne sont pas les élèves qui doivent choisir leur IDD ?
Sous openoffice, en basic, il y a rnd
Je te donne l'aide

Syntaxe :
Randomize [Number]
Paramètres :
Number : nombre entier initialisant le générateur de nombres aléatoires. Si vous ne spécifiez pas de nombre, le générateur utilise la valeur active de l'horloge système.
Codes d'erreur
5 Appel de procédure non valide
Exemple :

Code :

Sub ExampleRandomize
Dim iVar As Integer, sText As String
Dim iSpectral(10) As Integer
Randomize 2^14-1
For iCount = 1 to 1000
iVar = Int((10 * Rnd) ) REM Plage comprise entre 0 et 9
iSpectral(iVar) = iSpectral(iVar) +1
Next iCount
sText = " | "
For iCount = 0 to 9
sText = sText & iSpectral(iCount) & " | "
Next iCount
MsgBox sText,0,"Distribution spectrale"
end sub

Message cité 1 fois
Message édité par Trap D le 25-09-2006 à 14:18:14

sebhal

de match

Trap D a écrit :

Code :

Sub ExampleRandomize
Dim iVar As Integer, sText As String
Dim iSpectral(10) As Integer
Randomize 2^14-1
For iCount = 1 to 1000
iVar = Int((10 * Rnd) ) REM Plage comprise entre 0 et 9
iSpectral(iVar) = iSpectral(iVar) +1
Next iCount
sText = " | "
For iCount = 0 to 9
sText = sText & iSpectral(iCount) & " | "
Next iCount
MsgBox sText,0,"Distribution spectrale"
end sub

les élèves donnent leurs préférences, mais si une grande majorité préfère les IDD cinéma et BD plutot que construction de l'Europe et statistiques démographiques (je dis n'importe quoi au hasard, j'ai pas d'idd) il faut faire quand meme des groupes équilibrés

edit: ah oui au fait merci [:duss@noob] , je testerai ça mercredi

Message édité par sebhal le 25-09-2006 à 17:21:44

FORUM HardWare.fr

Programmation

Divers

tirage "loto" staroffice

Sujets relatifs
tirage aléatoire sans remise	Algo de tirage de cartes
tirage aléatoire sans remise	Tirage de nombre aléatoire.
[C++] [newbiz] Fonction de tirage aléatoire ?	Un tirage du LOTO sans 2 fois le même numéro !
[Delphi] tirage aléatoire suivant une loi normale ?	Function de tirage aleatoire [ RÉSOLU ! ]
[SQL + PHP ] - Tirage aleatoire dans une db?
Plus de sujets relatifs à : tirage "loto" staroffice

Page générée en 0.043 secondes