Pages

lunes, 21 de enero de 2013

Calcular el área del cilindro Codigo Fuente en Visual Basic

Problema
Hacer un programa o algoritmo que calcule el área de un cilindro.

Solución
  • Entrada: 5 7
  • Salida: 376.98192
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 r, h, area As Double
        r = TextBox1.Text
        h = TextBox2.Text
        area = 2 * Math.PI * r * (r + h)
        TextBox3.Text = Trim(area)
    End Sub
End Class

1 comentarios:

Programación Pro dijo...

grasias

Publicar un comentario