Bonjour
Voila je m'entraine sur pascal et donc me suis fait un programme avec une procèdure sur des choix de repas mais lors de ca compilation j'ai quelques erreur sur l'initialisation des variables de ces procèdures alors que je l'es ai bien initialisé enfin je crois.
mon erreur :
Code : 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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54 program carte; (* Procedure pour l'entree *) procedure entree; var choix1:char; begin writeln ('Veuillez saisir votre entrée "C ou O ou S" '); readln ('choix1'); case choix1 of 'C':writeln('Crudités'); 'O':writeln('Oeuf'); 'S':writeln('Soupe'); end; end; (* Procedure pour la plat *) procedure plat; var choix2:char 1; begin writeln ('Veuillez saisir votre plat "V ou P ou R" '); readln ('choix2'); case choix2 of 'V':writeln ('Viande'); 'P':writeln ('Poisson'); 'R':writeln ('Que des légumes'); end; end; (* Procedure pour le dessert *) procedure dessert; var choix3:char 1; begin writeln ('Veuillez saisir votre dessert "G" ou F ou S" '); readln ('choix3'); case choix3 of 'G':writeln ('Gateau'); 'F':writeln ('Fruit'); 'S':writeln ('Sorbet'); end; end; (*Programme principal*) begin entree; plat; dessert; end.
Merci d' avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Compiling exo38.pas exo38.pas(10,19) Error: Variable identifier expected exo38.pas(11,15) Warning: Local variable "choix1" does not seem to be initialized exo38.pas(25,19) Error: Variable identifier expected exo38.pas(26,15) Warning: Local variable "choix2" does not seem to be initialized exo38.pas(40,19) Error: Variable identifier expected exo38.pas(41,15) Warning: Local variable "choix3" does not seem to be initialized exo38.pas(54) Fatal: There were 3 errors compiling module, stopping exo38.pas(54) Fatal: Compilation aborted Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)
Partager