В Паскале. Создать массив А из десяти целых чисел. Вывести полученный массив на экран. Подсчитать k - количество элементов массива, значение которых превышает 12

Ответы

Ответ дал: KnowsUser1
1

Ответ:

PascalABC.NET

begin

 var A := ArrRandom(10, -99, 99);

 A.Println;

 A.Where(k -> k > 12).Count.Println;

end.

Объяснение:


BobbyFresnel: Внутри Count можно писать условие отбора, т.е. в данном случае вся программа может быть такой:
begin
ArrRandom(10, -99, 99).Println.Count(k -> k > 12).Println
end.
BobbyFresnel: Print это функция, она возвращает последовательность элементов того же типа. Она имеет все, кроме индексов, так что с ней можно работать целиком, как с массивом.
Вас заинтересует