SoloCodigo

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