1. Массив А состоит из 10 чисел, выбранных случайным образом из интервала [-17; 15]. Подсчитать сумму отриц. значений массива.

Question

Информатика

Поликарп

28 сентября, 03:46

1. Массив А состоит из 10 чисел, выбранных случайным образом из интервала [-17; 15]. Подсчитать сумму отриц. значений массива.

+3

Ответы (1)

Знаете ответ на вопрос?

Валентин · Answer 1

Const

n = 10;

var

i, s: integer;

a, b: array[1 ... n] of integer;

begin

for i : = 1 to n do

begin

a[i] : = random (17 + 15) - 17;

write (a[i], ' ') ;

if a[i] < 0 then

s : = s + a[i];

end;

writeln () ;

writeln (s) ;

end.