паскаль:процедуры и фунции

[Anerita]

составить подпрограмму,которая вычисляет сумму и кол-во элементов массива U(N),принадлежащие интервалу [A;B].С помощью подпрограммы вычислить сумму и кол-во элементов массивов E(15),D(6),C(14),принадлежащих интервалу [Х;Y].Для передачи имени массивов в подпрограмму использовать понятие открытого массива.Значения Х и Y ввести с экрана дисплея.Элементы массивов E,D,C вычислить по формулам:
E i=1,5i +3i-4;
D j=0,4je;
C k=cos(2,4k)e.

хотя бы алгоритм решения расскажите...

[p51x]

кол-во элементов массива U(N),принадлежащие интервалу [A;B]

счетчик = 0;
для счетчик1 = 0 до N-1 если (U[счетчик1] >= A) и (U[счетчик1] <= B), то счетчик = счетчик + 1;

[Anerita]

спасибо большое именно это я и не понимала как писать!еще подскажите,как высчитать E C D по формулам?и именно куда в программе это подставить?