- Es una estructutra que sigue a otra.
Ejercicios:
1. Elaborar un programa que me muestre la edad de una persona.
Module Module1
Dim edad As Integer
Dim f_nac As Integer
Sub Main()Console.WriteLine("ingrese la fecha de nacimineto:")
f_nac = Console.ReadLine
edad=2007 - f_nac
Console.WriteLine(edad)
Console.ReadLine()
End Sub
End Module
2.Elaborar un programa que me sume dos numeros.
Module Module1
Dim n1, n2 As Integer
Dim suma As Integer
Sub Main()
Console.WriteLine("ingrese numero 1:")
n1 = Console.ReadLine
Console.WriteLine("ingrese numero 2:")
n2 = Console.ReadLine
suma = n1 + n2
Console.WriteLine(suma)
Console.ReadLine()
End Sub
End Module
Elaborar un programa que me muestre el promedio de dos notas.
Module Module1Dim n1, n2 As Integer
Dim prom As Integer
Sub Main()
Console.WriteLine("ingrese nota 1:")
n1 = Console.ReadLine
Console.WriteLine("ingrese nota 2:")
n2 = Console.ReadLine
prom = (n1 + n2) / 2
Console.WriteLine(prom)
Console.ReadLine()
End Sub
End Module
1 comentario:
Publicar un comentario