Problema su Pascal

http://pastebin.com/Vpij6t47

Klaida yra šioje procedūroje, bandžiau debugint'i, tai klaidą meta ties pirmosios eilutės nuskaitymu.

Duomenų failas(Išsaugotas UTF-8 koduote):

http://pastebin.com/1eRXwaNX

program uzduotisMokiniai;

Const CMax  = 100;        	//Maksimalus masyvo indeksu skaicius
 	CDuom = 'Duom2.txt';	//Duomenu failas
 	CRez  = 'Rez2.txt'; 	//Rezultatu failas

//Masyvai ir irasas
Type Masyvas = Array[1..CMax] of integer;

type Mokiniai = record
   	VardasPavarde : string[20];
   	Pazymiai  	: Masyvas;
	end;

	MokMas 	= Array[1..Cmax] of Mokiniai;
	Vidurkiai  = Array[1..Cmax] of real;

//--------------------------Skaitymo procedura----------------------------------
Procedure Skaityti(var n : integer; var p : integer; var v : real;
          		var Mok : MokMas);
Var i,j : integer; // Ciklo kintamieji
F   : text;	// Dokumento kintamasis
Begin
Assign(F,CDuom);
Reset(F);

//Nuskaito pirmaja eilute
Readln(F, n, p, v);

//Nuskaito visas duom2.txt reikmes
For i:=1 to n do
   	begin
       	Read(F,Mok[i].VardasPavarde);
           	For j:=1 to p do
               	Read(F,Mok[i].Pazymiai[j]);
       	Readln(F);//<<--------------------------- KLAIDA (F praleidai)
   	end;

Close(F);
End;

Klaidą pažymėjau. Skaitant iš failo nebuvo perkeliama į kitą eilutę.

Dėkui, buvau praleidęs šitą :D. Bet gal bus pasiūlymų dėl blogo skaičiaus formato?

Na, kai tikrinau tavo procedūrą, man blogo skaičiaus formato klaidą rodė būtent dėl šio klaidos, nes neperkeldavo į kitą eilutę. Gal gali atsiųsti visą programą? Gal problema net ne procedūroje...

Na, kai tikrinau tavo procedūrą, man blogo skaičiaus formato klaidą rodė būtent dėl šio klaidos, nes neperkeldavo į kitą eilutę. Gal gali atsiųsti visą programą? Gal problema net ne procedūroje...

http://pastebin.com/0ZwaU8yu

Prašau.

Bad numeric format klaidą tau meta dėl to, kad naudoji UTF-8 koduotę. Pakeitus koduotę į ANCI (numatytąją .txt failų koduotę) nuskaitymas iš failo veikia be priekaištų.

P.S. Tavo sprendimo būdas tai... Na jei tokia užduotis aš nieko prieš neturiu, bet mokinių vidurkių taip net muzikos mokytoja neskaičiuoja...