Masyvas

>>

Pridek svoris.txt faila :)

Tu nenuskaitai tos n reikšmės, atidaręs failą skaitymui turi parašyti Readln(n); kad n turėtų kažkokią reikšmę, o tik poto su ja dirbti.

Tu nenuskaitai tos n reikšmės, atidaręs failą skaitymui turi parašyti Readln(n); kad n turėtų kažkokią reikšmę, o tik poto su ja dirbti.

Padariau taip, nuskaiciau n reiksme , ir vistiek neveikia, nesuprantu kodel, failai susieti teisingai, atrodo viskas kaip ir tvarkoj.

Bėda

for i:=1 to n do
begin
   Readln(Df,M[i]);
   sum:=sum+M[i];
end;

Turėtų būti Readln, o ne Read, jei vienas duomuo parašytas vienoje eilutėje.

Read visada skaito vieną eilutę, taigi tavo atvėju jis perskaito tik vieną masyvo elementą.

Readln perskaitęs vieną duomenų eilutę, peršoka iškart į kitą.