помогите пожалуйста с информатикой 10 класс

Разработайте блок-схему или напишите программу для подсчета произведения элементов целочисленного одномерного массива длиной 30 кратных 7. Массив заполнен случайными числами, лежащими в пределах -60 до 125.

pascal