jueves, 6 de septiembre de 2007

ESTRUCTURA SECUENCIAL


  • 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:

Adriana Baquez dijo...
Este comentario ha sido eliminado por el autor.