Вопрос по информатике:

Помогите пожалуйста с решением задач на Паскале.
Задачи связаны с составлением процедур и функций.
1. Даны два массива по 10 элементов в каждом. Найти общее количество элементов обоих массивов, больших вводимого с клавиатуры числа A. (Составить процедуру нахождения количества элементов массива, больших заданного числа)
2. Даны основания и высоты двух равнобедренных трапеций. Найти сумму их периметров. (Определить функцию для расчета периметра равнобедренной трапеции).
Составьте две программы и, если можно, поподробнее. Заранее благодарю за решения этих задач. С наступающим Новым годом! =)