lunes, 17 de junio de 2013

Permite Saber Si Es Mayor de 17 Para Inscribirse en "SMO"

If: es la expresión condicional
Then: Instrucción Verdadera
Else: Instrucción Falsa
End If: Finalización de la Expresión Condicional

Operadores Relacionales o Comparativos
> Mayor
< Menor
>= Mayor Igual
<= Menor Igual
<> Diferente
= Igual 

En este caso elaboraremos un algoritmo que nos permita averiguar si una persona debe de inscribirse en el Servicio Militar Obligatorio , sabiendo su año de nacimiento.

Identificadores: Año de Nacimiento (AN), Año Actual (AA), Edad (E).

Solución 

Module Module1
    Dim AN As Integer
    Dim AA As Integer
    Dim E As Integer

    Sub Main()
        Console.WriteLine("Ingrese Año de Nacimiento")
        AN = Console.ReadLine()
        Console.WriteLine("Ingrese Año Actual")
        AA = Console.ReadLine()
        E = AA - AN
        If (E > 16) Then
            Console.WriteLine("Debe Inscribirse en el SMO")
            Console.ReadLine()
        Else
            Console.WriteLine("No debe de Inscribirse en el SMO")
            Console.ReadLine()

        End If
    End Sub

End Module

No hay comentarios:

Publicar un comentario