ау

[Еуу]

Вычислить сумму элементов динамического массива, расположенных до 1 отрицательного элемента.

[studen]

sum = 0;
i = 1;
while (i <= #размер массива# ) and (mas[i] >= 0)
{
sum = sum + mas[i];
i = i + 1;
}
#вывод# sum

Это алгоритм, а не готовая программа. Но написать по нему программу, я думаю, легко.
ps. здесь массив нумеруется с 1

[Еуу]

напишите полностью я кран!