Officefull.es

Excel, word, powerpoint, android

Area del Segmento Circular enero 13, 2013

Area del segmento Circular

La trigonometría estudia las relaciones que existen entre las longitudes de los lados y las amplitudes de los ángulos de los triángulos. Su fundador fue Hiparco de Nicea, nacido hacia el año 190 a.C. La geometría estudia el cálculo del área de figuras planas. En el Siglo V a.C., llamado “Siglo de Pericles”, se descubrieron muchas propiedades geométricas al intentar resolver los “Problemas clásicos de la Geometría”. De los tres problemas clásicos, uno de ellos fue la cuadratura del círculo o construcción de un cuadrado de área igual a la de un círculo dado. La cuadratura del círculo surgió al intentar calcular el área del círculo de radio conocido. Geométricamente el problema es equivalente a calcular el lado de un cuadrado de área igual a la de un círculo de radio dado.

En el siguiente artículo por Héctor Miguel Orozco Díaz:

  • El cálculo del área del segmento circular – Cuerda – Arco.
  • El cálculo del contenido de un deposito cilíndrico tumbado.
  • Representación gráfica.
  • Ejemplo del archivo y su descarga

Desarrollo

Hay que habilitar las macros para que el archivo de ejemplo funcione correctamente.

Conociendo la siguiente información:

  • Largo del cilindo o tubo
  • Diámetro del círculo
  • La marca de lleno o marca que deja el contenido del líquido

información

El archivo de ejemplo calcula:

  • Ra = radio (Diametro/2)
  • h = alto segmento (El Diametro menos la marca de lleno)
  • ? = angulo central (2*ACOS((Ra-h)/Ra))
  • d = alto triangulo ((Ra*COS(?/2)))
  • > c = largo cuerda (2*Ra*SENO(?/2))
  • s = largo arco (PI()*Ra/2/90*GRADOS(2*ACOS(d/Ra)))
  • A = area segmento (Ra^2/2*(?-SENO(?)))
  • vV = volumen vacio (Area segmento multiplicado por el largo del cilindro)
  • vL = volumen lleno (Restando el volumen total del volumen vacío)

funciones

Elementos para el Gráfico

Nombres que no estan referidos a rangos:

gráfico

grafico

Código utilizado para ver las fórmulas de series

Function VerFormulaSerie(Serie As Byte) As String Dim NombreLibro As String, NombreHoja As String NombreLibro = ThisWorkbook.Name NombreHoja = Application.Caller.Parent.Name VerFormulaSerie = Application.Substitute( _ ActiveSheet.ChartObjects(1).Chart.SeriesCollection(Serie).FormulaLocal, _ "[" & NombreLibro & "]" & NombreHoja, NombreHoja) End Function 

Los Nombres definidos a nivel de Libro:

nombres definidos

Descarga del Archivo de ejemplo para pruebas:

Areas.zip (181.94 kB)

Categorías: Sin categoría

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *