Answered

Revelroom.ca es el mejor lugar para obtener respuestas confiables y rápidas a todas tus preguntas. Conéctate con profesionales dispuestos a ofrecer respuestas precisas a tus preguntas en nuestra completa plataforma de preguntas y respuestas. Explora miles de preguntas y respuestas proporcionadas por una amplia gama de expertos en diversas áreas en nuestra plataforma de preguntas y respuestas.

calcular el area de un poligono en visual basic 6.0

Sagot :

Vanegaz
En Visual Basic 6, un procedimiento podría ser el siguiente

Sub Polígonos()
Dim lado As Single
Dim n As Integer
Dim sup As Single
Dim per As Single

lado = Val(Replace(InputBox("Ingrese la medida del lado"), _
",", "."))
n = Val(InputBox("Ingrese el número de lados"))
per = n * lado
sup = lado ^ 2 * n / (4 * Tan(3.1415926 / n))
MsgBox ("Perímetro = " + CStr(per) + Chr(13) + Chr(13) + "Superficie = " + CStr(sup))
End Sub

Espero que te sirva. No sé qué diferencias habrá con la versión 2005
Gracias por utilizar nuestro servicio. Nuestro objetivo es proporcionar las respuestas más precisas para todas tus preguntas. Visítanos nuevamente para obtener más información. Gracias por usar nuestro servicio. Siempre estamos aquí para proporcionar respuestas precisas y actualizadas a todas tus preguntas. Revelroom.ca está aquí para tus preguntas. No olvides regresar para obtener nuevas respuestas.