напишите решение задачи в виде рпограммы на языке pascal
вводится последовательность из n натуральных чисел, найти сумму всех отрицательных

если не трудно скажи зачем сразу условие что sum:=0?

потому что изначально у нас нет чисел которые надо складывать, значит сумма изначально будет равна 0

а чисда вводятся во время выполнения цикла

Program;var a,n,i,sum:integer;sum:=0;Beginfor i:=1 to n dobegin;read(a);if (a<0) thensum:=sum+a;end;writeln(sum);End.