С 10 задачей помощч плез

Приложения:

gfhjkmgfhjkm20: if a[i]>0 then k:=k+1

Ответы

Ответ дал: Koljisto
0

Begin

 var arr:=ArrRandomInteger(ReadInteger('Введите размер массива'),-100,100);

 arr.Println;

 arr.where(x->x>0).Count.Println;

end.

Вас заинтересует