Pages

jueves, 17 de enero de 2013

sumatoria de n primeros números por formula Codigo Fuente en Visual Basic

Problema
Calcular la sumatoria de n primero números

Solución
Se ingresa un número entero y  retorna la suma de los números anteriores incluido el número ingresado.
Ejemplo
  • Ingresa: 5
          1+2+3+4+5 = 15   
  • Salida: 15
Codigo Fuente en Visual Basic
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object,
        ByVal e As System.EventArgs) Handles Button1.Click
        Dim Num As Integer
        Num = TextBox1.Text
        Num = Num * (Num + 1) / 2
        TextBox2.Text = Trim(Num)
    End Sub
End Class

0 comentarios:

Publicar un comentario