составить схему алгоритма определения количества положительных и отрицательных элементов в массиве X[N].
Ответы
Ответ дал:
0
Ответ:
Все написано извиняюсь если что-то не правильно
Приложения:
![](https://st.uroker.com/files/aee/aee453d5e97f97a736d91380b641a9aa.jpg)
Ответ дал:
0
Var
X:array[1..1000]of integer;
N,polo,otri,k:integer;
Begin
Readln(k);
For n:=1 to k do
Read(x[n]);
For n:=1 to k do
If x[n]<0 then inc(polo)
Else
Inc(otri);
Writeln(polo);
Writeln(otri);
End.
За ошибки извиняюсь
Приложения:
![](https://st.uroker.com/files/aee/aee453d5e97f97a736d91380b641a9aa.jpg)
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад