ПОЖАЛУЙСТА, ПОМОГИТЕ СО 2,4 И 5 ЗАДАЧАМИ! PASCAL

Как вы предлагаете решить 2 и 4 задачку, когда там не указан размер массива? Я окончательно не уверен, но динамические массивы в школах не проходят.

Решение 5 задачи, решу 2 и 4, если ответите на вопрос в обсуждении.
Вновь же задачки очень ущербно сформулированы, и здесь нет ответа на такие вопросы как "выводить ли сам массив на экран, вещественные либо целые использовать типы, как вообщем ввод и вывод должен работать", поэтому не жаловаться на неверное построение задачки.

program abc;
var
   a:array[1..100] of integer;
   i,chet,nechet:integer;
begin
   nechet:=0;
   chet:=0;
   for i:=1 to 100 do
      a[i]:=random(99)+1;
   for i:=1 to 100 do 
      if(odd(a[i])=true) then inc(nechet)
       else inc(chet);
   writeln(chet,' ',nechet); 
end.