Задан массив, состоящий из 15 элементов вещественного типа. Опреде- лить количество

Задан массив, состоящий из 15 частей вещественного типа. Опреде- лить количество частей, значения которых больше первого элемента.

Задать свой вопрос
1 ответ
// PascalABC.NET 3.2, сборка 1485 от 15.06.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var a:=ArrRandomReal(15,-10,10); a.Println;
  Writeln('Элементов, великих первого, ',
      a.Where(x-gt;xgt;a[0]).Count)
end.

Пример
1.32138581542363 -7.42206571503639 -8.75516477914302 6.17963798166236 -4.88329186797295 6.02313704603498 -5.68947898023272 -4.43705633023617 2.51164194779081 -3.27493339463833 8.22698325767507 -7.95714398750902 4.07602354608291 -2.3214872238792 4.90172023647545
Частей, великих первого, 6
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт