Pascal. Bad numeric format

Sveiki, vis ieškau klaidos (106 - Bad numeric format ), nerandu.

program Noname3;
type info = record
   menesis : string[8];
   temperatura : real;
   end;

type men = array[1..100] of info;

var mene : men;
   D, R : text;
   kmen, ktemp, i, j : integer;


begin
 assign(D, 'duom.txt');
 assign(R, 'rez.txt');
 rewrite(R); reset(D);
 Read(D, kmen); Read(D, ktemp);
 for i:= 1 to kmen do
   begin
       read(D,mene[i].menesis);
       for j:= 1 to ktemp do
           begin
               Read(D,mene[j].temperatura);//cia rodo klaida
           end;
   end;
   close(D);
   Close(r);
end.

Duom.txt failas

1 6
Sausis  11 -10.3 -12 -6.5 -5 -15.5

Čia pirmas skaičius mėnesių kiekis, antras temperatūrų skaičius.

Pražiūrėjau viską ką išmaniau, daugiau neįsivaizduoju kur klaidos ieškot.

Sveiki, vis ieškau klaidos (106 - Bad numeric format ), nerandu.

 

 Read(D, kmen); Read(D, ktemp);

Man rodos, kad Tu tiesiog baigi skaityti duomenis pirmoje eilutėje ir nenušoki į antrą. Manau, kad užtektų pakeisti į:

Read(D, kmen); Readln(D, ktemp);

Klaidą tau rodo dėl 'Sausis', jį nuskaito, tačiau negali transformuoti į integer dėl to ir meta klaidą.

aiwaraz gerai sakė. Persikelsi į kitą eilutę ir tada viskas veiks

Readln(D, ktemp);

Padėjo, ačiū :)