Co jest nie tak z tą składnią Pascala?
Nie mogę zrozumieć, co tu się dzieje. Czy może Pan mi pomóc? To jest problematyczny kod:
While not EOF(Archi) do begin
index:= index + 1;
Read(Archi, Alumno[index]);
Promes[index] := (Alumno[index].nota1 + Alumno[index].nota2) / 2;
if Promes[index] >= 6 then begin
alguPromo := true;
PromosIndex := PromosIndex + 1;
Promos[PromosIndex]:= Alumno[index];
end;
else begin
if Promes[index] > 4 then cantiRecu:= cantiRecu + 1;
else begin
LibresIndex += 1;
Libres[LibresIndex] := Alumno[index];
end;
end;
end;
Kompilator oznacza błąd w wierszu 10 tego kodu (w przeciwnym razie zaczyna się). Błąd jest następujący: Błąd krytyczny: błąd składniowy; oczekiwano, ale znaleziono ELSE.
Jeśli ktoś chce skompilować tacę tutaj, to cały kod:http://pastebin.com/dRg1Lguu