Помогите составить программы в Паскаль.
1.​ Заполнить массив случайными числами из интервала от 0 до 50 и вывести его на экран. Найти сумму его четных элементов.

2.​ Заполнить массив элементами значения которых определяются согласно формулы: i*3-2, где I – индекс элемента.. Диапазон изменения индексов: от 1 до 10