Создать массив дробных чисел, не менее чем одинарной точности из 30 элементов. Пользователь должен внести числа самостоятельно. Найти количество элементов, значение которых не менее чем в 3 раза больше среднего арифметического. Вывести это количество. (Паскаль)

ну вроде "алгоритм" переходит в "терминал", хотя по буквам не получается - только последние 5 нормально встают и то, если в алфавите нет ё и й

а необходимо

б достаточно

в необходимо

г достаточно

д необходимо и достаточно

на чём писать? ну впрочем саму суть тут в условии:

объявляешь 3 числа: a b c

и условие

  if(a> 0)then

a: =a*a;

if(b> 0)then

b: =b*b;

if(c> 0)then

c: =c*c;

  выводишь на экран(или как там надо)

сори за ошибки давно на паскале не писал 

три богатыря ( где они там думали. куда пойти: прямо, налево или направо)