Язык программирования какой? паскаль заносиш переменные которые нужно если это массив то массив if(a<0) then sum:=sum+a;