Ввести Т чисел . Определить кол-во четных и не четных чисел Pascal через цикл

В Паскале есть отличная функция ODD для этого. Даже если не учили такую, то просто проверяешь остаток от деления на 2
if a mod 2=0 then k:=k+1 else n:=n+1;
где k - счетчик четных чисел, а n - нечетных