Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Помогите решить:
В массиве, состоящем из n элементов, определить количество элементов, значение которых больше 17

Ответ оставил Гость

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  Print(Элементов, больших 17:,
      ArrRandom(ReadInteger(n=),1,50).Println
      .Where(x->x>17).Count)
end.

Тестовое решение:
n= 13
20 40 13 26 31 50 42 27 49 14 50 7 27
Элементов, больших 17: 10