Pascal/Turbo Pascal - PROBLEMAS CON UN EJERCICIO DE CLASE.URGENTE!!!!!!!

Tengo el siguiente problema q no se resolver.Tengo q crear un programa q lea desde teclado una secuencia indeterminada de valores positivos terminada en 0 y q muestre en pantalla la suma acumulada de cada uno de los tramos formados por 5 valotres consecutivos,a menos q el tramo aparezca un numero negativo en cuyo caso aparecera el mensaje de tramo no valido.
Ejemplo: 3216345-1611922350
devolvera:15 tramo no valido 20
debido a: .- 3+2+1+6+3=15
.- aparece el -1
.- 1+6+9+2+2=20

porké te entrega como resultado 20 y no 19, si se supone que tienes que sumar 6+1+1+9+2 = 19???
si me explicas bien esa parte te puedo ayudar...
chao

porké te entrega como resultado 20 y no 19, si se supone que tienes que sumar 6+1+1+9+2 = 19???
si me explicas bien esa parte te puedo ayudar...
chao