Ejercicio 1
- Cantidad y suma de números enteros
(Anidamiento de repetitivas y alternativas - Pascal)
Escribir un programa (en Pascal) que:
1º)
Pida por teclado un número (dato entero).
2º) Repita el paso 1º, mientras que, el
número introducido sea distinto de cero.
3º) Muestre
cuántos números mayores que cero han sido
introducidos por el usuario, así como, la suma de todos
ellos.
En pantalla:
Introduzca
un número entero: 4
Introduzca
un número entero: 8
Introduzca
un número entero: -6
Introduzca
un número entero: 12
Introduzca
un número entero: 0
Ha
introducido 3 número(s) mayor(es) que cero.
La suma es 24
|
Introduzca
un número entero: -3
Introduzca
un número entero: 0
Ha
introducido 0 número(s) mayor(es) que cero.
La suma es 0
|
Solución
|
