Дан одномерный массив из 15 целых случайных чисел из диапазона [-10; 20] найдите сумму отрицательных чисел

#include <iostream>using namespace std;

int main() { int n=0,m; for (int i = 0; i < 15; i++) { cin >> m; if (m < 0) n += m; } cout << n; return 0;}

Var  a:array [1..15] of integer; 
 i, sum:integer;
begin
For i:=1 to 15 do
begin
a[i]:=random(31)-10;
Write(a[i],' ');
If a[i]<0
then
sum:=sum+a[i];
end;Writeln;
Writeln(sum);
end.