Programación General > Pascal

 Exit Code 106

(1/1)

alben:
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:
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:
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;

Navegación

[0] Índice de Mensajes