Массив и элементы! Опции

[Вернант]

Задан массив B из 15 элементов целого типа.Посчитать количество четных элементов
массива.

[Ivs]

Необязательно. Тип также делают для работы с несколькими массивами.Например:
type A=array[1..5] of integer;
A1=array[1..4] of A;
var B,C:A;
D:A1;
PS Хотя мне кажется, что наш препод(директор) немного не в себе!

Это у тебя получается обычный двумерный массив, тоже самое что a1: array[1..4,1..5] of integer;
массивы нужно объявлять в тип для того чтобы они правильно передовались в процедуры и функции,
так что согласен с  bonnyka.