Download Elaborar un programa que calcula el salario neto
Document related concepts
no text concepts found
Transcript
Tema 9. Estructuras de repetición “Repetir Mientras” Sintaxis de la estructura “repetir mientras” en Visual Basic Forma 1 Forma 2 Do While expresión lógica While expresión lógica Una o más instrucciones (1) Loop Una o más instrucciones (1) End While EJERCICIO No. 1 Dado un conjunto de valores de diámetros de los árboles de una parcela, calcular la cantidad de árboles que pueden ubicarse dentro de cada una de las siguientes categorías: Categoría de diámetro (cm) ≤ 10 (10,20] > 20 EJERCICIO No. 2 Programa que calcula la suma y la media aritmética de un conjunto de números. No se conoce de antemano cuántos números se van a introducir. Cada vez que se introduce un número se muestra un MsgBox donde se pregunta si se desea introducir un nuevo número, si la respuesta es sí, aparece un InputBox para escribir el siguiente número, si es no, entonces se muestran la suma, la media aritmética y la cantidad de números procesados. Sintaxis completa MsgBox Variable = Msgbox (“mensaje”, tipo_MsgBox, “título”) Tipo de MsgBox 0 1 2 3 4 5 Botones que aparecen Aceptar Aceptar y Cancelar Abortar, Reintentar, Ignorar Sí, No, Cancelar Sí, No Reintentar, Cancelar Valores de retorno de un MsgBox Valor 1 2 3 4 5 6 7 Significado El usuario hizo clic en el botón Aceptar El usuario hizo clic en el botón Cancelar El usuario hizo clic en el botón Abortar El usuario hizo clic en el botón Reintentar El usuario hizo clic en el botón Ignorar El usuario hizo clic en el botón Sí El usuario hizo clic en el botón No Sub Main() Dim num, suma, media As Single Dim can_num As Integer Dim resp As Byte suma = 0 can_num = 0 resp = 6 Do While resp = 6 num = InputBox("Escriba un número:", "ejemplo 2") suma = suma + num can_num = can_num + 1 resp = MsgBox("¿Desea introducir otro número?", 4, "ejemplo 2") Loop media = suma / can_num MsgBox("Números procesados = " & can_num & Chr(10) & "Suma = " & suma & Chr(10) & "Media = " & media) End Sub EJERCICIO No. 3 Una facultad necesita un programa para obtener la siguiente información acerca de sus estudiantes: -Número de estudiantes del sexo femenino -Número de estudiantes del sexo masculino -Promedio general de los hombres -Promedio general de las mujeres Asumir que el número de estudiantes es conocido previamente por el usuario