No todos los problemas pueden resolverse empleando estructuras secuenciales. Cuando hay que tomar una decisión aparecen las estructuras condicionales.
En nuestra vida diaria se nos presentan situaciones donde debemos decidir.
¿Elijo la carrera A o la carrera B?
¿Me pongo este pantalón?
Para ir al trabajo, ¿Elijo el camino A o el camino B?
Al cursar una carrera, ¿Elijo el turno mañana, tarde o noche?
Por supuesto que en un problema se combinan estructuras secuenciales y condicionales.
Estructura condicional simple.
Cuando se presenta la elección tenemos la opción de realizar una actividad o no realizar ninguna.
Representación gráfica:
Podemos observar:
El rombo representa la condición. Hay dos opciones que se pueden tomar. Si la condición da verdadera se sigue el camino del verdadero, o sea el de la derecha, si la condición da falsa se sigue el camino de la izquierda donde no hay ninguna actividad.
Se trata de una estructura CONDICIONAL SIMPLE porque por el camino del verdadero hay actividades y por el camino del falso no hay actividades.
Por el camino del verdadero pueden existir varias operaciones, entradas y salidas, inclusive ya veremos que puede haber otras estructuras condicionales.
Problema:
Ingresar el sueldo de una persona, si supera los 3000 pesos mostrar un mensaje en pantalla indicando que debe abonar impuestos.
Diagrama de flujo:
Podemos observar lo siguiente: Siempre se hace la carga del sueldo, pero si el sueldo que ingresamos supera 3000 pesos se mostrará por pantalla el mensaje "Esta persona debe abonar impuestos", en caso que la persona cobre 3000 o menos no aparece nada por pantalla.
Programa:
Module Module1
Sub Main()
Dim sueldo As Single
Console.Write("Ingrese el sueldo:")
sueldo = Console.ReadLine()
If sueldo > 3000 Then
Console.Write("Esta persona debe abonar impuestos")
End If
Console.ReadKey()
End Sub
End Module
La palabra clave "If" indica que estamos en presencia de una estructura condicional; seguidamente disponemos la condición. La actividad dentro del If finaliza con la palabra clave End If.
Es común que el contenido del If se indente (corrido hacia la derecha) para una fácil lectura del programa.
Ejecutando el programa e ingresamos un sueldo superior a 3000 pesos. Podemos observar como aparece en pantalla el mensaje "Esta persona debe abonar impuestos", ya que la condición del If es verdadera.
Volvamos a ejecutar el programa y carguemos un sueldo menor o igual a 3000 pesos. No debe aparecer mensaje en pantalla.
Estructura condicional compuesta.
Cuando se presenta la elección tenemos la opción de realizar una actividad u otra. Es decir tenemos actividades por el verdadero y por el falso de la condición. Lo más importante que hay que tener en cuenta que se realizan las actividades de la rama del verdadero o las del falso, NUNCA se realizan las actividades de las dos ramas.
Representación gráfica:
En una estructura condicional compuesta tenemos entradas, salidas, operaciones, tanto por la rama del verdadero como por la rama del falso.
Problema:
Realizar un programa que solicite ingresar dos números distintos y muestre por pantalla el mayor de ellos.
Diagrama de flujo:
Se hace la entrada de num1 y num2 por teclado. Para saber cual variable tiene un valor mayor preguntamos si el contenido de num1 es mayor (>) que el contenido de num2, si la respuesta es verdadera vamos por la rama de la derecha e imprimimos num1, en caso que la condición sea falsa vamos por la rama de la izquierda (Falsa) e imprimimos num2.
Como podemos observar nunca se imprimen num1 y num2 simultáneamente.
Estamos en presencia de una ESTRUCTURA CONDICIONAL COMPUESTA ya que tenemos actividades por la rama del verdadero y del falso.
Programa:
Module Module1
Sub Main()
Dim num1, num2 As Integer
Console.Write("Ingrese primer valor:")
num1 = Console.ReadLine()
Console.Write("Ingrese segundo valor:")
num2 = Console.ReadLine()
If num1 > num2 Then
Console.Write(num1)
Else
Console.Write(num2)
End If
Console.ReadKey()
End Sub
End Module
Cotejemos el diagrama de flujo y la codificación y observemos que el primer bloque después del If representa la rama del verdadero y el segundo bloque después de la palabra clave Else representa la rama del falso.
Compilemos el programa, si hubo errores sintácticos corrijamos y carguemos dos valores, como por ejemplo:
Ingrese el primer valor: 10 Ingrese el segundo valor: 4 10
Si ingresamos los valores 10 y 4 la condición del If retorna verdadero y ejecuta el primer bloque.
Un programa se controla y corrige probando todos sus posibles resultados.
Ejecutemos nuevamente el programa e ingresemos:
Ingrese el primer valor: 10 Ingrese el segundo valor: 54 54
Cuando a un programa le corregimos todos los errores sintácticos y lógicos ha terminado nuestra tarea y podemos entregar el mismo al USUARIO que nos lo solicitó.
Operadores
En una condición deben disponerse únicamente variables, valores constantes y operadores relacionales.
Operadores Relacionales:
> (mayor) < (menor) >= (mayor o igual) <= (menor o igual) = (igual) <> (distinto)
Operadores Matemáticos
+ (más)
- (menos)
* (producto)
/ (división)
mod (resto de una división) Ej.: x=13 mod 5 {se guarda 3}
Hay que tener en cuenta que al disponer una condición debemos seleccionar que operador relacional se adapta a la pregunta.
Ejemplos:
Se ingresa un número multiplicarlo por 10 si es distinto a 0. (<>) Se ingresan dos números mostrar una advertencia si son iguales. (=)
Los problemas que se pueden presentar son infinitos y la correcta elección del operador sólo se alcanza con la práctica intensiva en la resolución de problemas.
Problemas propuestos
- Realizar un programa que lea por teclado dos números, si el primero es mayor al segundo informar su suma y diferencia, en caso contrario informar el producto y la división del primero respecto al segundo.
- Se ingresan tres notas de un alumno, si el promedio es mayor o igual a siete mostrar un mensaje "Promocionado".
-
Se ingresa por teclado un número positivo de uno o dos dígitos (1..99) mostrar un mensaje indicando si el número tiene uno o dos dígitos.
(Tener en cuenta que condición debe cumplirse para tener dos dígitos, un número entero)
Module Module1
Sub Main()
Dim num1, num2 As Integer
Console.Write("Ingrese primer valor:")
num1 = Console.ReadLine()
Console.Write("Ingrese segundo valor:")
num2 = Console.ReadLine()
If num1 > num2 Then
Dim suma, diferencia As Integer
suma = num1 + num2
diferencia = num1 - num2
Console.Write("La suma de los dos valores es:")
Console.WriteLine(suma)
Console.Write("La diferencia de los dos valores es:")
Console.WriteLine(diferencia)
Else
Dim producto, division As Integer
producto = num1 * num2
division = num1 / num2
Console.Write("El producto de los dos valores es:")
Console.WriteLine(producto)
Console.Write("La división de los dos valores es:")
Console.WriteLine(division)
End If
Console.ReadKey()
End Sub
End Module
Module Module1
Sub Main()
Dim nota1, nota2, nota3 As Integer
Console.Write("Ingrese primer nota:")
nota1 = Console.ReadLine()
Console.Write("Ingrese segunda nota:")
nota2 = Console.ReadLine()
Console.Write("Ingrese tercer nota:")
nota3 = Console.ReadLine()
Dim promedio As Integer
promedio = (nota1 + nota2 + nota3) / 3
If promedio >= 7 Then
Console.Write("Promocionado")
End If
Console.ReadKey()
End Sub
End Module
Module Module1
Sub Main()
Dim num As Integer
Console.Write("Ingrese un valor entero de 1 o 2 dígitos:")
num = Console.ReadLine()
If num < 10 Then
Console.Write("Tiene un dígito")
Else
Console.Write("Tiene dos dígitos")
End If
Console.ReadKey()
End Sub
End Module