Salut
Chaque joueur est "représenté" par un pointeur de type T_joueur, qui est un record avec les champs suivant: pseudo(string), cpt_jeton(integer) et suivant(T_ptr_joueur)
J'avais écrit cette procédure, qui affiche les informations de chaque joueur à la fin de la partie:
Procedue AFFICH_SCORE(ptr_courant:T_ptr_joueur);
var
i:integer;
begin
For i:=1 to 3 do
begin
Writeln('La partie est finie. Les scores sont les suivants : ');
With ptr_courant^ do
writeln(pseudo,', vous avez gagne ',cpt_jeton,'jetons pendant la partie.');
end;
ptr_courant:=ptr_courant^.suivant
end;
Je voudrais juste que ça s'affiche dans la fenêtre d'exécution comme ça:
joueur X a gagné Z jetons,
joueur Y a gagné W jetons
.
.
.
en commençant par celui qui en a gagné le plus.
Seulement ce que j'ai écrit ne se contente que d'afficher les champs de chaque joueur, et ne fait pas le classement.
Voilà, j'espère que ça sera suffisant, sinon dis moi ce qu'il te manque
Merci
Message édité par Profil supprimé le 25-04-2008 à 20:27:21