tengo un problema en pascal

[Napster_EPD]

tengo que hacer este programa:
Suponga que desea saber qué "perfil" tienen sus llamadas telefónicas. Para ello realizará un programa que solicite la duración de las llamadas y calcule:
-   la duración total de sus llamadas.
-   el valor medio.
-   el número total de llamadas.
Estos resultados se presentarán por pantalla.

Para este ejercicio hace falta un bucle que vaya pidiendo la duración de las distintas llamadas. El algoritmo sería aproximadamente:
-   Iniciar los valores de las variables necesarias (número de llamadas y duración total de todas las llamadas entre otras).
-   Leer la duración de la primera llamada.
-   Mientras la duración de la llamada sea mayor que cero:
o   Incrementar el número de llamadas en uno.
o   Incrementar el tiempo total que suman todas las llamadas.
o   Leer la duración de otra llamada.
-   Si se ha introducido alguna llamada:
o   Realizar los cálculos necesarios.
o   Presentar resultados.
gracias de antemano
-   Si no se introdujo ninguna llamada indicarlo al usuario.

[gordo23]

¿Cuál es tu problema específicamente?

[Vaagish]

tengo que hacer este programa: blablabla

Cuando lo tenes que tener terminado? Avísanos, así lo hacemos por vos.. (:irónico:)

[JFormoso]

Lo que estás probando usar es un if then para crear el bucle y contar el tiempo de llamadas!? Y en el caso que el if then sea 0 en la primer llamada comunicar!?