Câu 2:
a) Câu lệnh nhập giá trị:
for i:=1 to 40 do
   begin
      writeln('Nhap phan tu thu ',i,': '); readln(Diem[i]);
   end;
b) Câu lệnh in giá trị:
for i:=1 to 40 do
   write('Diem hoc sinh thu ',i,' la: ',Diem[i]);
Câu 3:
Cú pháp truy cập đến phần tử trong mảng:
   Tên mảng [chỉ số];
Xác định giá trị:
   A[4]= 5;
   A[6]= 1;
   A[4]-A[6]= 5-1= 4;
Học tốt!