Bài 1: Hãy viết các câu lệnh khai báo theo yêu cầu sau: A. Khai báo mảng A gồm 100 phần tử thuộc kiểu dữ liệu số thực. B. Khai báo mảng B gồm 20 phần tử thuộc kiểu dữ liệu số nguyên. C. P hần tử thứ 7 của mảng A được gán giá trị là 8. D. Khai báo mảng dayso gồm 50 phần tử thuộc kiểu dữ liệu số nguyên. Bài 2: Viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím. Bài 3: Viết chương trình nhập điểm kiểm tra học kỳ môn Tin cho N học sinh và in ra màn hình. Với N và điểm kiểm tra được nhập từ bàn phím( sử dụng biến mảng). Bài 4: Viết chương trình: a) Nhập vào mảng A có n phần tử. b) In mảng A đã nhập ra màn hình. c) In ra màn hình các số dương. d) Tính tổng và giá trị trung bình của các số dương trong mảng. Bài 5: Viết chương trình: a) Nhập vào mảng A có n phần tử. b) In mảng A đã nhập ra màn hình. c) In ra các số chẵn của mảng. d) In ra các số lẽ của mảng.
Xin lỗi mọi người đã làm phiền, nhưng mình thật sự cần sự giúp đỡ. Ai có thể dành chút thời gian để trả lời câu hỏi mình đang mắc phải không?

Program ct;

Var i,n,so le, so chan:integer;

B:Array[1..n] of integer;

Begin

Write('n=');Readln(n);

For i:=1 to n do begin Write('B[',i,']=');

Readln(B[i]);

End;

For i:=1 to n do Begin

if B[i] mod 2 <>0 then writeln('so le , ' );

If B[i] mod 2=0 then writeln('so chan ,' );

End;

Readln

End.