Сикт 9 класс 1: дан массив целых чисел состоящих из 20 элементов. найти кол-во отрицательных элементов массива. 2: найти минимальный элемент массива (состоящий из 20 элементов)
//PascalABC.Net 3.1 сборка 1200 begin var a:=ArrRandom(20,-50,50); Writeln('Отрицательных чисел ', a.Where(x->x<0).Count); Writeln('Минимальный элемент ', a.Min); end.
begin
var a:=ArrRandom(20,-50,50);
Writeln('Отрицательных чисел ', a.Where(x->x<0).Count);
Writeln('Минимальный элемент ', a.Min);
end.