Đọc hiểu ý nghĩa của các câu lệnh và điền kết quả vào bảng sau

Phiếu học tập số 1: Đọc hiểu ý nghĩa của các câu lệnh và điền kết quả vào bảng sau:
Lệnh
Ý nghĩa
i, n : integer;
var
Diemtoan, Diemvan : array[1..100] of
real;
BEGIN
Writeln('Diem trung binh :’);
For i:=1 to n do writeln(i,'.',
(Diemtoan[i]+Diemvan[i])/2:3:1);
END.
Phiếu học tập số 2: Bổ sung các câu lệnh trên vào vị trí thích hợp trong chương trình của
câu 1 để hoàn thiện chương trình theo yêu cầu bài 2.(theo gợi ý sau)
Program Bai_2;
Var i,n:integer;
Begin
Write('Nhap so cac ban trong lop n =');
Readln(n);
Với biến đếm i:=1 đến n lần lượt thực hiện
Begin
Nhập điểm toán của các học sinh trong lớp;
Nhập điểm văn của các học sinh trong lớp;
End;
Với biến đếm i:=1 đến n lần lượt thực hiện in ra màn hình điểm trung bình của mỗi
bạn trong lớp theo công thức: (Diemtoan[i]+Diemvan[i])/2;
Readln
End.