TOP

Visual Basic Consola - Secuenciales 01




01.  Hacer un programa que muestre el promedio de 3 notas.

Imports System.Console
Module Module1
    Dim N1, N2, N3 As Decimal
    Sub Main()
        WriteLine("PROMEDIO DE 3 NOTAS")
        WriteLine()

        Write("Ingrese Nota 1: ")
        N1 = ReadLine()
        Write("Ingrese Nota 2: ")
        N2 = ReadLine()
        Write("Ingrese Nota 3: ")
        N3 = ReadLine()

        WriteLine()
        WriteLine("EL PROMEDIO ES : " & (N1 + N2 + N3) / 3)
        ReadLine()
    End Sub
End Module


share_facebook

DAME UN ME GUSTA - SI VALORAS ESTE CÓDIGO


1 comentarios:

  1. Anónimo

    muy bueno :)

Publicar un comentario

Danos tu opinión o déjanos tu ejercicio! - Algoritmos, pseudocódigo y lo pasamos a Visual Basic consola.