Câu 1 a) viết cú pháp khai báo biển mảng trong Pascal? b) Áp dụng: Hãy viết vc khai báo biến cần nhập điểm môn tin học cho lớp 8A4 với số lượng hs nam là 15 nữ là 16 cứu iêm:)))

a)

Trực tiếp:

var <tên biến mảng>: array [kiểu chỉ số] of <kiểu phần tử>;

Gián tiếp:

type <tên kiểu mảng>=array [kiểu chỉ số] of <kiểu phần tử>;

var <tên biến mảng>:<tên kiểu mảng>;

b) 

uses crt;
var Nam:array[1..15] of real;
    Nu:array[1..16] of real;
    i:byte;
begin
   clrscr;
   for i:=1 to 15 do
   begin
      write('Nhap diem cua ban nam thu ',i,': ');
      readln(Nam[i]);
   end;
   for i:=1 to 16 do
   begin
      write('Nhap diem cua ban nu thu ',i,': ');
      readln(Nu[i]);
   end;
   readln
end.