Question

Vă rog să mă ajutați , nu se compilează
program crearea;
type
Elev = record
Nume : String;
Pronume : String;
NotaMedie : Real;
end;
FisierElevi = file of Elev ;

var FE : FisierElevi;
E : Elev;
str : string;
i , n : integer;
begin
Write('dati numele fișierului de creat:');
readln(str);
assign(FE,str);
rewrite(FE);
Write('dati numărul d elevi:');
ReadLn(n);
for i:=1 to n do
begin
WriteLn('dati datele elevului :',i);
WriteLn('Nume:');
ReadLn(E.Nume);
writeln('Prenume:');
readln(E.Prenume);
writeln('NotaMedie:');
Readln(E.NotaMedie);
Write(Fe,E);
end;
close(FE);

readln;
end.

Answer 1

copie mai atent programul P89 de la pagina 35, clasa 10, informatica

Programul de acolo e corect. ai greşit la transcriere numele câmpului la tipul Elev. înloc de Prenume ai scris Pronume.   Şi tr să te înveţi să citeşti erorile că în Pascal foarte clar îţi spune unde este eroarea. Mai verifici codul şi cred găseai şi corectai eroarea.