Дан массив из 30-ти элементов. Каждый элемент может принимать целочисл енные значения от -100 до 100. Напишите программу, которая позволит подсчитать среднее арифметическое положительных элементов массива, которые кратны первом...

Дан массив из 30-ти элементов. Каждый элемент может принимать целочисл енные значения от -100 до 100. Напишите программу, которая позволит подсчитать среднее арифметическое положительных элементов массива, которые кратны первому элементу массива. Первый элемент не равен 0. (Паскаль)