Discussion :

[Oberown]

J'ai une course de voiture, où je dois rentrer les résultats des positions des 4 premiers arrivés.

Par exemple:
voiture C 1er
voiture D 2eme
voiture E 3eme
voiture G 4eme

Il est possible qu'il y ai un ou plusieurs exaquo, et dans ce genre de cas je saute les numéros
A 1er
D 1er
G 3eme
E 4eme

ou

H 1er
I 1er
A 1er
R 4eme

ou

J 1er
A 2e
G 2e
C 4e

Je voudrais lors de la saisie des résultas être capable de voir si je ne n'ai pas fait une erreur.
Par exemple ce résultat est faux (B et D doivent avoir une place de plus)
J 1er
A 1er
B 2eme
D 3eme

Avez-vous des idées de pistes ?

[Graffito]

A partir des données triées par rang d'arrivée :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ResultOk=true ;
ClassementCourant=1 ;
for (int i=0;i<Classement.Count && ResultOk;i++) 
  if (Classement[i]!=ClassementCourant)
  {
     ClassementCourant=i+1 ; // En principe, classement[0]=1
     ResultOk=Classement[i]==i+1 ;
  }

[Zavonen]

Après tout il n'y a que 8 cas possibles.
Si l'arrivée est une liste de 4 couples du type (V,r) où V est une voiture et r son rang.
Il suffit d'extraire les rangs, de les trier et de comparer avec un des 8 résultats possibles.
Exemple de code en python

Code python :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#liste des 8 cas possibles pour les arrivées
Possibles=[[1,1,1,1],[1,1,1,4],[1,1,3,3],[1,1,3,4],[1,2,2,2],[1,2,2,4],[1,2,3,3],[1,2,3,4]]
 
def Isok(arrivee):
    """Fonction de test"""
    voitures=[x[0] for x in arrivee]#isoler les voitures
    ranks=[x[1] for x in arrivee]#isoler les rangs
    ranks.sort() #les trier
    #vérifier qu'il n'y a pas de doublons dans les voitures
    comptes=[voitures.count(x) for x in voitures] #nombres d'occurence des 4 voitures dans l'arrivée
    if any([c>1 for c in comptes]):#si une répétition
        return False #alors erreur
    else:#sinon
        return ranks in Possibles #tester si vraisemblable
 
 
if __name__ == "__main__":
    print Isok([('A',1),('C',2),('G',4),('E',3)]);
    print Isok([('A',1),('C',2),('G',2),('E',3)]);
    print Isok([('A',1),('A',2),('G',4),('E',3)]);
 
"""Résultat:
True
False
False
"""

[Graffito]

#vérifier qu'il n'y a pas de doublons dans les voitures

Je n'ai pas traité cette contraine dans mon Algo !

[Oberown]

Il y a une erreur Savoven dans ton algo

Il est possible qu'on est 5 voitures ou plus qui soit arrivés 1er ou 3 voitures 1er et 5 voitures 4eme etc...

Voici ce que j'ai fait en VB .net (la liste est déjà trié)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 Dim resHaut As Integer = 1
            Dim resActuelle As Integer = 1
Dim resultat As Boolean = true
 
            For Each r As Integer In lstRes
                If r <> resHaut AndAlso r <> resActuelle Then
                    resultat = False
                End If
                resHaut = resHaut + 1
                resActuelle = r
            Next

La position du véhicule doit soit avoir la même position que celui d'avant ou avoir le numéro de la position relative.

[Zavonen]

Il y a une erreur Savoven dans ton algo

Oui, pas le temps de regarder aujourd'hui, je verrai demain.