Ejercicio
1
- Media aritmética de números
introducidos (Repetitiva repetir...hasta - Pascal)
Escribir un programa (en Pascal) que:
1º)
Pida por teclado un número (dato entero).
2º) Muestre por pantalla los mensajes:
- Ha introducido
<cantidad_de_números> número(s)
- La suma es
<suma>
3º) Pregunte
al usuario si desea introducir otro o no.
4º) Repita los
pasos 1º, 2º y 3º, mientras que, el usuario
no responda 'n' de (no).
5º) Muestre por
pantalla la media aritmética (dato real) de los
números introducidos.
Nota:
Utilice un bucle repetir...hasta (repeat...until).
En
pantalla:
Introduzca
un número entero: 3
Ha introducido 1 número(s)
La suma es 3
¿Desea introducir otro (s/n)?: s
Introduzca
un número entero: 7
Ha
introducido 2 número(s)
La suma es 10
¿Desea introducir otro (s/n)?: s
Introduzca
un número entero: 6
Ha
introducido 3 número(s)
La suma es 16
¿Desea
introducir otro (s/n)?: s
Introduzca
un número entero: 13
Ha
introducido 4 número(s)
La suma es 29
¿Desea
introducir otro (s/n)?: n
La media aritmética es 7.25
|
Introduzca
un número entero: 8
Ha
introducido 1 número(s)
La suma es 8
¿Desea
introducir otro (s/n)?: n
La
media aritmética es 8.000000
|
Solución
|
|