Developing.ru

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

Задача
Вычисление суммы элементов массива, начиная с "К"-го по порядку и до элемента, равного нулю(если такой элемент встретится; иначе - до конца массива). "К", длину массива и значения элементов вводить с клавиатуры.
Печатать элементы массива по 5 штук, по формату :12. Тип данных - веществ.

Помогу. Обращайся 255507394.

for i:=k to N do
if A=0 then break else inc(sum, A);