Gọi mảng A là số sách của học sinh lớp 11A5 quyên góp . Khai báo mảng A và các biến liên quan. Chú ý : khai báo theo kiểu gián tiếp và trực tiếp

Trực tiếp

Var  sosanh : array [1 .. 10] of integer;

n: integer;

n ở đây là biến dùng để lặp ví dụ số sách của học sinh lớp 11a5 là 5 bạn thì nhập n là 5.

Gián tiếp 

Type  mang = array [1 .. 10] of integer;

Var  sosanh : mang;

n: integer;

- Khai báo trực tiếp:

Sach: Array[1..50] of byte; 

(Một lớp khoảng 50 học sinh, và số sách là số thực nên để byte)

n: byte; (Số học sinh của lớp)

- Khai báo gián tiếp:

Type mang = array[1..50] of byte;

Var Sach: mang; (Gọi lại mang)

n: byte;