Заполнить массив случайными числами в интервале - вопрос №227274608 от P0SEYD0N 23.04.2021 01:35

Question

Информатика: Заполнить массив случайными числами в интервале [-2; 2] и подсчитать количество положительных элементов.

P0SEYD0N · Answer

// PascalABC.NET 3.2, сборка 1389 от 01.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
write('исходный массив: ');
var a:=ArrRandom(10,-2,2).Println();
writeln('k=',a.Where(x->x>0).Count());
end.