salut
je suis debutant en pascal
j'ai fais ce code mais je netrouve pas l'erreur
merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 program premier; type feu=(rouge,jaune,vert); var d:feu; begin readln (d) case d of rouge:writeln('stop'); vert:writeln('demarrer'); jaune:writeln('attention'); readln; end; end.
Partager