• Viernes 29 de Marzo de 2024, 02:57

Autor Tema:  Exit Code 106  (Leído 4149 veces)

alben

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Exit Code 106
« en: Sábado 13 de Enero de 2007, 03:01 »
0
he hecho un programa con pascal que compila perfectamente, pero al ejecutarlo me da este error. He leido que es el error que da cuando espera un numero y obtiene otra cosa, asi que se donde debe estar el problema pero no como solucionarlo

Creo que el fallo esta aqui:


function LeerPedidos (var pedidos:text): ped
var
N,L,I,J: integer;
c:char;
r:ped;
begin
I;=0
while not eof (pedidos) do
begin
I:=I+1;
L:=1,
J:=1;

while c<> ';' do
begin
read (pedidos, C);
r.nomcli [j]:= C;
j:= J+1;
end;

repeat
read (pedidos, C);
r.nomciu [L]:= C;
L:= L+1;
until c = ';'

readln (pedidos, N)
r.nump:= N
end;

el fichero del que le tiene este formato "Nombrecliente;Nombreciudad;Nºplazas" sin las comillas. Supongo que el fallo sera que cuando llega al primer punto y coma vuelve al principio de al linea, la verdad es que no se como arreglar. Cualquier idea o sugerencia es bienvenida.


Gracias por adelantado
end

Enko

  • Miembro de PLATA
  • *****
  • Mensajes: 1562
  • Nacionalidad: 00
    • Ver Perfil
Re: Exit Code 106
« Respuesta #1 en: Sábado 13 de Enero de 2007, 20:51 »
0
Me pregutna si te compiló lo que posteaste:
1: function LeerPedidos (var pedidos:text): ped
¿que se supone que es "ped"?
¿te falta el ";"?
2: begin  I;=0
Se supone que la asignacion es ":=" y no ;=

¿Compilo? :unsure:

alben

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Re: Exit Code 106
« Respuesta #2 en: Sábado 13 de Enero de 2007, 22:46 »
0
compilar si compila, esta copiado a mano, x eso hay fallos de puntuacion
ped es un tipo que habia definido, se me paso indicarlo aqui, es un record con esta forma

ped : record
nomcli: string[25];
nomciu: string[25];
nump: integer
end;