Record

Mulţimea de valori ale unui tip de date record este constituită din  înregistrări . Inregistrarile sînt formate din componente, denumite câmpuri. Spre deosebire de componentele unui tablou, câmpurile pot fi de tipuri diferite. Fiecare câmp are un nume ( identificator de câmp ).
type Elev = record;
Nume, Prenume: string;
NotaMedie:real;
end;
var E1, E2:Elev;

Diagrama de sintaxa 


Program p1;
Type Restanta=record
Nume,prenume:string;
Clasa:integer;
med:real;
var A:array[1..1000]of integer;
begin
writeln('introduceti nr. de elevi');
for i:=1 to n do begin
writeln('introduceti elevul',i);
writeln('introduceti numele');
readln(A[i].nume);
writeln('introduceti prenumele');
readln(A[i].prenume); end;
writeln('nume:',A[i].nume);
writeln('prenume:',A[i].prenume); end;
r:=0;
for i:=1 to n do
if A[i].med<5 then begin
r:=r+1;
write('nume:',A[i].nume);
write('prenume:',A[i].prenume);
write('clasa:',A[i].clasa);
write('med:',A[i].med); end;
writeln('restantieri sint',r);
readln; end.