Viết chương trình Pascal nhập ngẫu nhiên mảng 1 chiều có n phần tử

Viết chương trình Pascal nhập ngẫu nhiên mảng 1 chiều có n phần tử, n <=300, mỗi phần tử là số nguyên dương <= 150. Tính và hiển thị số lượng số chẵn trong mảng vừa tạo.