Bonjour,
J'ai un petit problème. J'aimerais faire un tirage aléatoire d'un jeu de carte. J'ai défini un record pour mes cartes
Cepedant je n'arrive pas à faire tirer une carte alétoire (random ne fonctionne pas) et que l'ordinateur me l'affiche. Pouvez-vous m'aider??
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 program cartes; type ordreC=(T2,T3,T4,T5,T6,T7,T8,T9,T10,TV,TD,TR,TA, K2,K3,K4,K5,K6,K7,K8,K9,K10,KV,KD,KR,KA, C2,C3,C4,C5,C6,C7,C8,C9,C10,CV,CD,CR,CA, P2,P3,P4,P5,P6,P7,P8,P9,P10,PV,PD,PR,PA,Vide); carte =record nom:ordreC; end; PaquetCartes = array[1..52] of carte;
Merci d'avance
Partager