
Составьте программу подсчёта числа различных отрицательных элементов одномерного массива A(Q)
Паскаль

//PascalABC.NET 3.1 сборка 1239
begin
Println(ArrRandom(100, -50 ,50).Count(x->x<0));
end.
Оцени ответ