Заполнить массив из 15 элементов случайными числами - вопрос №85557351505 от anyayakubchick 11.01.2021 05:06

Question

Информатика: Заполнить массив из 15 элементов случайными числами в интервале от 0 до 50.подсчитать количество элементов, значения которых меньше 50.

anyayakubchick · Answer

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

Begin
var a:= ArrRandom(15,0,50);a.PrintLn;
Writeln(a.Where(t -> t < 50).Count);
end.

Пример:
16 38 2 12 48 5 18 12 27 12 48 5 6 43 28
15