Pascal/Turbo Pascal - Ayuda Illegal Expression

   
Vista:

Ayuda Illegal Expression

Publicado por Ahmed (11 intervenciones) el 08/11/2013 19:14:32
Hola espero que me podais ayudar. El caso es que al compilar mi código, en Pascal, me dice que PROCEDURE es una expresion ilegal y no se por que... gracias de antemano

PROGRAM practica8;
VAR
opcion: char;
BEGIN
PROCEDURE Menu;
BEGIN
writeln('Elige una opcion: ');
writeln('1 - Mostrar Nombre');
writeln('2 - Operaciones con enteros');
writeln('3 - Operaciones con reales');
writeln('4 - Operaciones con caracteres');
writeln('5 - Calcular dia de pascua');
writeln('6 - Calcular orden');
writeln('7 - Saber el cuatrimestre');
writeln('8 - Cara opuesta del dado');
writeln('9 - Saber el numero de primos en un intervalo');
writeln('10- Suma de intervalo de primos');
writeln('0 - Salir');
writeln;
END;
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Ayuda Illegal Expression

Publicado por ramon (2072 intervenciones) el 08/11/2013 21:03:06
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
{Compara tu error}
 
PROGRAM practica8;
VAR
opcion: char;
 
PROCEDURE Menu;
BEGIN
writeln('Elige una opcion: ');
writeln('1 - Mostrar Nombre');
writeln('2 - Operaciones con enteros');
writeln('3 - Operaciones con reales');
writeln('4 - Operaciones con caracteres');
writeln('5 - Calcular dia de pascua');
writeln('6 - Calcular orden');
writeln('7 - Saber el cuatrimestre');
writeln('8 - Cara opuesta del dado');
writeln('9 - Saber el numero de primos en un intervalo');
writeln('10- Suma de intervalo de primos');
writeln('0 - Salir');
writeln;
END;
 
BEGIN
       Menu;
       readln;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar