Написать программу для нахождения суммы отрицательных чисел некоторой последовательности из N целых чисел.

arslanovaigiz arslanovaigiz    3   15.05.2020 13:51    0

Ответы
9570896123 9570896123  14.10.2020 19:56

Паскаль.

var

 N, x, i, sum : integer;

begin

 readln(N);

 sum := 0;

 for i:=1 to N do begin

   readln(x);

   if x<0 then sum := sum + x;

 end;

 writeln(sum);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика