Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

Энджелл

Найти среднее геометрическое положительных элементов массива м(16) стающих на нечетных местах

более месяца назад
Просмотров : 26    Ответов : 1   

Лучший ответ:

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
  var m:=ArrRandom(16,-99,99); m.Println;
  var s:=m.Where((e,i)->i.IsEven and (e>0));
  Writeln('Ср.геом. положительных на нечетных местах ',
    Power(s.Aggregate(1.0,(p,e)->p*e),1/s.Count):0:4)
end.

Тестовое решение
12 58 -54 77 -68 -41 -79 -91 -18 -57 98 81 28 97 33 79
Ср.геом. положительных на нечетных местах 32.2864

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы:



Зачетный Опарыш
(С ) С клавиатуры вводится строка . Разработать программу , которая реализует указанные действия . а ) подсчитывает количество слов , которые имеют нечетную длину ; б) выводит на экран частоту вхождения каждой буквы ; в) удаляет текст размещен в круглых скобках.
более месяца назад
Смотреть ответ   Просмотров : 15    Ответов : 1