Glosario

Random Access Memory o Memoria de Acceso Aleatorio; requiere alimentación de energía en todo momento para permanecer intacta. Dado que toda la memoria de la HP48 es RAM, tan pronto como las baterías se remueven únicamente se tienen unos cuantos minutos antes de que los capacitores se descarguen y la memoria se pierda.

Este foro, solamente es de lectura, para los nuevos foros dirígase a www.adictoshp.org

Aquí programa para calcular el Área de un Poligono Irregular

Sin respuestas
Integró: 28/06/2003
Envíos: 194
MonedasHP: 126
Imagen de deachp
deachp Usuario Desconectado. Visto por última vez 2 años 19 semanas.
Aquí programa para calcular el Área de un Poligono Irregular
 
Vie, 12/06/2009 - 00:36

Saludos a todos,

Aquí les envío un pequeño programa para calcular el área de un poligono irregular basado en las coordenadas de sus vertices sobre el plano cartesiano.
[Descargar programa APOLRHP50] (Descarga válida para la HP 49G/G+ 50G)

La formula utilizada es la siguiente:

Programa Cálculo del Área de un Poligono Irregular

«
"Area de un Poligono Irregular"
{"∑DAT:"}
{1 0} {}
IF '∑DAT' VTYPE 3 ==
THEN ∑DAT 1 ->LIST
ELSE {}
END
INFORM
IF THEN
OBJ-> DROP DUP '∑DAT' STO
TRN AXL
OBJ-> DROP
DUP SIZE -> X Y n
«
'1/2*ABS(∑(k=1,n-1,X(k)*Y(k+1)-Y(k)*X(k+1))+X(n)*Y(1)-Y(n)*X(1))'
EVAL
"Area" ->TAG
»
END
»

Graben el programa con el nombre APOLR, al ejecutarlo les pedirá ingresar la matriz de datos [X Y], pares ordenados correspondientes a las coordenas de los vertices del poligono irregular.

[Descargar programa APOLRHP50] (Descarga válida para la HP 49G/G+ 50G)

Este y otros ejemplos totalmente explicados aparecerán en la nueva versión del Manual DEACHP de Programación en User-RPL para calculadoras gráficas HP.

Atte. Dante Aroní C.
www.deachp.com

DEACHP Software www.deachp.com
Todo sobre Calculadoras HP
Ventas, Soporte Técnico y Cursos de Programación
UNI / Lima / Perú
Telfs: (+51)997111260 (+51)4810146

Top

Twitter