Подсчет числа различных повторяющихся элементов массива

помогите задачки решать...... блин очень надо
1.1 Составьте программу вычисления суммы тех элементов одномерного массива A(N), что расположены перед первым нулевым элементом данного массива.
1.2 Составьте программу, заменяющую каждый из элементов T[i] массива T(N) максимальным среди первых i элементов данного массива.
2.1 Составьте программу подсчета числа различных повторяющихся элементов массива C(M,P).
2.2 Составьте программу, выясняющую, есть ли в двухмерном массиве A(N,M) строки, сумма элементов которых есть отрицательное число.
3 Составьте программу,вычеркивающую из слова X гласные буквы, стоящие на нечетных местах.
4 type число=1..31;
месяц=(янв,фев,мар,апр,май,июн,июл,авг,с ен,окт,ноя,дек);
деньнедели=(вс,пн,вт,ср,чт,пт,сб);
var d:число;m:месяц;wdl,wd:деньнедели; k:0..12;
Считая, что год невисокосный и его 1 января приходится на день недели wdl, определить k-количество понедельников в году, приходящихся на 13-е числа.

Добавлено через 34 минуты
Помогите плиз..............

0

помогите плиз очень надо

0