पास्कल रिकॉर्ड के साथ

पास्कल को परिभाषित एक रिकॉर्ड

type 
Books = record
   title: packed array [1..50] of char;
   author: packed array [1..50] of char;
   subject: packed array [1..100] of char;
   book_id: integer;
end;