Ответы
Ответ дал:
0
// PascalABC.NET 3.3
begin
var n:=10;
var a:=ArrRandomInteger(n,-20,40); a.Println;
Println(a.Where(x->x<0).Count);
a:=a.Select(x->x<0?x*x:x).ToArray;
a.Println;
end.
Пример:
14 36 -14 -10 -11 39 19 -15 4 28
4
14 36 196 100 121 39 19 225 4 28
begin
var n:=10;
var a:=ArrRandomInteger(n,-20,40); a.Println;
Println(a.Where(x->x<0).Count);
a:=a.Select(x->x<0?x*x:x).ToArray;
a.Println;
end.
Пример:
14 36 -14 -10 -11 39 19 -15 4 28
4
14 36 196 100 121 39 19 225 4 28
Вас заинтересует
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад