[VB-Consola] Sacar Promedio de 3 Notas
Página 1 de 1. • Comparte •
[VB-Consola] Sacar Promedio de 3 Notas

El Codigo (Source)
- Código:
Imports System.Console
Module Module1
Sub Main()
'Aqui estamos creando un total de 4 variables tipo Integer (Numero Entero)
Dim n1, n2, n3, r As Integer
'Aqui abajo estamos escribiendo en la consola el texto "Ingrese nota 1"
'de lado se coloca se permite colocar un valor
Write("Ingrese nota 1: ")
'que hacemos aqui abajo? n1 = leer valor ingresado, con esto guardamos el valor que
'nosotros ingresamos.
'[Lo mismo hacemos con las otras 2 notas, claro con sus variables correspondientes]
n1 = ReadLine()
Write("Ingrese nota 2: ")
n2 = ReadLine()
Write("Ingrese nota 3: ")
n3 = ReadLine()
'para que creamos la variable r? para adquirir el valor que necesitamos y utilizarlo
'con mas facilidad...
'r = sumamos los 3 valores y luego lo dividimos entre 3 para sacar su promedio...
'porque esta en parentecis? para que se ejecute primero la suma enves del a division
'ya que matematicamente se ejecutaria primero la division si no colocamos los parentecis
r = (n1 + n2 + n3) / 3
'luego aqui debajo estamos enviando un cuadro de mensaje mostrando el valor que
'adquirio "r"
MsgBox("Su promedio es: " & r)
End Sub
End Module
Koleshy- Pendejo
- Mensajes : 37
Fecha de inscripción : 21/11/2013
Edad : 21
Localización : Lima, Perú

» Promedio de dias total entre varias fechas
» ¿Promedio de promedios?
» Sacar el mensaje con la llave de activación de la cuenta
» Se puede sacar el reglon que dice en linea?
» sacar el ForoGratis:
» ¿Promedio de promedios?
» Sacar el mensaje con la llave de activación de la cuenta
» Se puede sacar el reglon que dice en linea?
» sacar el ForoGratis:
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.
» [TOOL] Wifi Free
» [SISTEMA] Comprar|Levelear Habilidades (max. 7)|con criterios
» [SISTEMA] Duelos Ultimate
» [SISTEMA] Duelos/Torneos (TiposDeDuelo{TodosContraTodos/EnEquipos})
» [SISTEMA] Creditos Flotantes
» [SISTEMA] Cospre Items con estadistica y Duracion
» [SISTEMA] Runas Avanzado
» [SISTEMA] Comprar habilidades y hacerlas leveleables