Задана последовательность из n целых чисел. Определить среднее арифметическое частей

Задана последовательность из n целых чисел. Определить среднее арифметическое частей последовательности , великих заданного значения d .

Задать свой вопрос
1 ответ
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
  var a:=ReadArrInteger(ReadInteger('n='));
  var d:=ReadInteger('d=');
  Writeln('Среднее ',a.Where(x-gt;xgt;d).Average)
end.

Тестовое решение:
n= 8
6 3 -1 12 11 9 7 4
d= 8
Среднее 10.6666666666667
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт