Предмет: Информатика,
автор: SvErtyxiVYxo
С 10 задачей помощч плез
Приложения:

gfhjkmgfhjkm20:
if a[i]>0 then k:=k+1
Ответы
Автор ответа:
0
Begin
var arr:=ArrRandomInteger(ReadInteger('Введите размер массива'),-100,100);
arr.Println;
arr.where(x->x>0).Count.Println;
end.
Похожие вопросы
Предмет: Математика,
автор: rozafilippova08
Предмет: Русский язык,
автор: mezinaaleksandra121
Предмет: Алгебра,
автор: CyXaPyk
Предмет: Геометрия,
автор: азиден
Предмет: Математика,
автор: ДашаКот69