Question

Дан массив из 10 элементов. Найти количество положительных элементов, сумму отрицательных и кол-во нулей.

Answer 1

Ответ:

var 

mas: array[1..10] of integer; 

plus, minus, i:integer;

begin

randomize;

write('Массив: ');

for i := 1 to 10 do begin 

mas[i]:=random(10)-5; 

write(' ',mas[i]); 

if (mas[i] > 0) then   

plus:=plus+1; 

if (mas[i] < 0) then   

minus:=minus+1; 

end;

writeln();

writeln('Положительных = ', plus);

writeln('Отрицательных = ', minus);

end.

Answer 2

Ответ:

на питоне

from random import randint

mass = [randint(-20, 20) for i in range(10)]

print('массив:', *mass)

sum_neg = pos = zero = 0

for i in mass:

   if i > 0:

       pos += 1

   elif i < 0:

       sum_neg += i

   else:

       zero += 1

print(f'кол-во положительных = {pos}\nсумма отрицательных = {sum_neg}\nкол-во нулей = {zero}')

Объяснение: