Объявить 2 массива на 15 элементов для целых чисел, первый заполнить случайными числами от -30 до 40 найти среднее, во второй записать номера ячеек в которых числа меньше средне-арефметического и подсчитать кол-во, и вывести на экран.
Паскаль изучаете?
да
Исходник и пример работы в приложении к ответу