Question

Дан одномерный массив значения элементов которого вводятся с клавиатуры выяснить каких элементов больше положительных или отрицательных и насколько на экран вывести исходный массив И полученный результат Помогите срочно

Answer 1

Const n=10;
var a:array[1..n] of integer;
i,x,y:integer;
begin
x:=0;
y:=0;
Writeln('Введите элементы массива');
for i:=1 to n do begin
    Write('a[',i,']=');
    Readln(a[i]);
    if (a[i]>0) then inc(x);
    if (a[i]<0) then inc(y);
end;
writeln (a);
if (x>y) then write('Положительных больше');
if (x<y) then write('Отрицательных больше');
if (x=y) then write('Количество отрицательных и положительных равно');
end.

Answer 2

Для решения данной задачи необходимо выполнить следующие шаги:

1. Пользователю предлагается ввести размерность массива (количество элементов). 2. Создается одномерный массив указанной размерности. 3. Пользователю предлагается ввести значения элементов массива. 4. Происходит подсчет количества положительных и отрицательных элементов в массиве. 5. Выводится исходный массив и результат (количество положительных и отрицательных элементов).

Пример кода на языке Python:

```