легкие задачки с процедурами

[Losvegas]

помгите срочно нужно сделать до 7 утра завтрышнего дня
Задача 1. Составить паскаль-программу с использованием процедуры (функции).
Дано: одномерные вещественные массивы А, B (размерность выбрать самостоятельно).
Для каждого массива определить:
1. номер первого отрицательного элемента
2. среднее арифметическое элементов с четными индексами
Задача 2.
Дано: одномерный вещественный массив, размещенный в динамической памяти.
Определить максимальный элемент среди элементов с нечетными индексами, количество нулевых элементов

огромнешее спасибо тем кто поможет скину 200 рублей на вебмоней мне абсолютно не жалко очень прощу нужно срочно

[sinj]

могу сделать в с++.