Дано : равномерный массив А[n]
Найти количество отрицательных элементов массива
J:=0;
For I:=1 to n do
If a[I]
writeln (j);
End.
Оцени ответ
