Fişierul, în contextul limbajului Pascal, este o structură de date omogenă, formată din componente de acelaşi tip, exceptînd tipul fişier -
In Turbo Pascal exista trei tipuri de fisiere:
1. fisiere cu tip - componentele au acelasi tip si sunt stocate pe disc;
2. fisiere text - componentele sunt caractere structurate pe linii de lungimi variabile;
3. fisiere fara tip - componentele sunt blocuri de informatii de lungime fixa, stocate pe disc.
Moduri de declarare
1) type FișierNumere = file of Integer
var FN: FișierNumere;
n: integer;
2) type FișierCaractere = file of char;
var FC: FișerCaractere;
c:char;
3) type Elev = Record;
Nume, Prenume: string;
NotaMedie: real;
end;
FișierElevi = file of Elev;
var FE: FișierElevi;
E: Elev;
Exemplu de program
Program P1;
var i,n: integer;
f:file;
s:string;
begin
writeln('Introduceti textul');
readln(s);
assign(f:s);
rewrite(f); n:=0;
for i:=1 to length(s) do
n:=n+1; close (f);
writeln(n);
readln;
end.
Niciun comentariu:
Trimiteți un comentariu