Programación General > Pascal

 Me Pueden Asesorar En Mi Programa

(1/1)

Asafita:
Hola, lo que pasa es que el programa de BUSCAMINAS que intento hacer me marca errores, solo busco que me asesoren.

Se los agradecería mucho.

Enko:

--- Código: Text --- for ren:=1 to 3 do  for col:=0 to 4 do   begin     if arr[ren,col]=666 then     begin      if (arr[ren,col+1]<>666) and (col<=3) then arr[ren,col+1]:=arr[ren,col+1]+1;     if (arr[ren,1-1]<>666) and (col)=)2 then arr[ren,col-1]:=arr[ren,col-1]-1;     end;   end;end;  

--- Código: Text --- if (arr[ren,1-1]<>666) and (col)=)2 then arr[ren,col-1]:=arr[ren,col-1]-1;  está mal hecha la condicion:
--- Citar --- and (col)=)2

--- Fin de la cita ---
Deberia ser and (col=2) o (col >= 2) o (col <=2);

Si coriges eso, compila perfectamente.

Navegación

[0] Índice de Mensajes