Exit code 106

0

mam problem z takim fragmentem kodu:

var tabdane:array[1..10] of real;
plik:text;
dane,sciezka:string;
k,i,b:integer;

procedure wczytaj_dane_z_pliku;

begin
	Write('Podaj nazwe pliku:');
	Read(dane);
        sciezka:=+dane+'.txt';
	Writeln(sciezka);
	Assign(plik,sciezka);
	Reset(plik);
	k:=0;
	While Not Seekeof(plik) Do
		begin
			k:=k+1;
			Read(plik,tabdane[k]);
		end;
	Close(plik);
	For i:=1 To k Do
	Writeln(tabdane[i]:2:3);
        KM:=tabdane[1];
        m:=tabdane[2];
        Sp:=tabdane[3];
        Cd:=tabdane[4];

        wyzeruj_stan_modelu_okresl_podstawowe_parametry;
end;

kompilator freepascal :) wyskakuje blad exit code 106 w tp chodzilo bez problemu ma ktos jakis pomysl ??

0

Dobra jesli ktos ma taki problem :) to mowie co sie dzialo czlowiek jest glupi i uczy sie cale zycie :) dla tp chyba jest bez znaczenia czy jaka przecinek stosujemy kropke czy tez przyslowiowy przecinek natomiast w freepascalu ma to znaczenie i ot caly problem :) hehehe wystarczylo w pliku z danymi zmienic symbol dziesietny ale tu uwaga na nie wszystkich stacjach bedzie identycznie poniewaz symbol dziesietny zalezy od ustawien systemowych :) pewnie po tym rozwiazaniu zostanie to usuniete z forum :P

1 użytkowników online, w tym zalogowanych: 0, gości: 1