Foros del Web » Programación para mayores de 30 ;) » Programación General »

Error pascal

Estas en el tema de Error pascal en el foro de Programación General en Foros del Web. me pueden decir un error que me da en mi free pascal necesito sabes cual es, me dice que tiene una (;) sobrante pero no ...
  #1 (permalink)  
Antiguo 08/06/2011, 22:27
 
Fecha de Ingreso: junio-2011
Mensajes: 1
Antigüedad: 12 años, 10 meses
Puntos: 0
Busqueda Error pascal

me pueden decir un error que me da en mi free pascal necesito sabes cual es, me dice que tiene una (;) sobrante pero no se cual es

Cita:
uses
crt;
var
num1,num2,num3:integer;
procedure leer(var n1,n2,n3:integer);
begin
write('valor 1: ');readln(n1);
write('valor 2: ');readln(n2);
write('valor 3: ');readln(n3);
writeln;
end;

procedure evaluar(var n11,n22,n33: integer);
begin
if n11>n22 then
begin
if n11>n33 then
begin
write(n1,' es el mayor.');
end
end;
end
else
begin
if n22>n33 then
write(n33,' es el mayor');
end
else
begin
write(n22,' es el mayor');
end;

begin
ClrScr;
leer(num1,num2,num3);
evaluar(num1,num2,num3);
ReadKey;
end.
lo necesito mucha ayuda plis
  #2 (permalink)  
Antiguo 09/06/2011, 03:07
Avatar de Heimish2000  
Fecha de Ingreso: enero-2011
Ubicación: Madrid
Mensajes: 844
Antigüedad: 13 años, 2 meses
Puntos: 89
Respuesta: Error pascal

Que error te da exactamente?
  #3 (permalink)  
Antiguo 09/06/2011, 09:15
Avatar de jamesjara  
Fecha de Ingreso: mayo-2008
Ubicación: san jose
Mensajes: 449
Antigüedad: 15 años, 11 meses
Puntos: 7
Respuesta: Error pascal

A simple vista se ve un error no se si sera ese

al final falta un end;

begin
ClrScr;
leer(num1,num2,num3);
evaluar(num1,num2,num3);
ReadKey;
end.

bueno y esa fucnion no esta cerrada tampoco evaluar
__________________
X7CLOUD El webservice latino!
Compatible
con mysql,sql,sqlitte.
Compatible con extjs , sencha , smargwt, Gwt , Jquery , Charts, Streaming.

Última edición por jamesjara; 09/06/2011 a las 09:23

Etiquetas: pascal
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 02:45.