Script Centroides De Figuras Compuestas
Wisdoom2 de Mayo de 2013
469 Palabras (2 Páginas)826 Visitas
<html>
<head>
<script language="javascript">
function ejecutar()
{ // De esta marca hacia atrás es el inicio del programa
// El programa comienza a partir de acá
alert("Buenos dias");
alert("Esta aplicacion esta diseñada para calcular Coordenadas de Centroides de Areas compuestas.");
alert("Por favor de click en Aceptar para ingresar a esta aplicación");
alert("¿De cuantos rectángulos se compone su figura compuesta?");
re=0;
tr=0;
se=0;
acu1=0;
acu2=0;
re=parseInt(prompt());
alert("De click en aceptar si su figura se compone de "+re+" rectángulos");
var i=0;
for (i=1;i<=re;i++){
alert("Por favor digite el área y la altura centrodial en Y del "+i+" rectángulo");
a1=parseInt(prompt());
y1=parseInt(prompt());
ay1=a1*y1;
acu1=acu1+a1;
acu2=acu2+ay1;
}
alert("¿Ahora de cuantos triángulos se compone su figura compuesta?");
tr=parseInt(prompt());
alert("De click en aceptar si su figura se compone de "+tr+" triángulos");
var o=0;
for (o=1;o<=tr;o++){
alert("Por favor digite el área y la altura centrodial en Y del "+o+" triángulo");
a2=parseInt(prompt());
y2=parseInt(prompt());
ay2=a2*y2;
acu1=acu1+a2;
acu2=acu2+ay2;
}
alert("¿Por último, de cuantos semicírculos se compone su figura compuesta?");
se=parseInt(prompt());
alert("De click en aceptar si su figura se compone de "+se+" semicírculos");
var p=0;
for (p=1;p<=se;p++){
alert("Por favor digite el área y la altura centrodial en Y del "+p+" semicírculo");
a3=parseInt(prompt());
y3=parseInt(prompt());
ay3=a3*y3;
acu1=acu1+a3;
acu2=acu2+ay3;
}
sol=acu2/acu1;
alert("Procesando sus datos...");
alert("'Gracias, la coordenada del Centroide en Y ó la posición del eje neutro para esta área compuesta es de: "+sol+" cm");
// El programa termina acá.
// De acá en adelante es el fin del programa.
return true;
}
</script>
</head>
<body onload="ejecutar();">
Sofware para Calcular Coordenadas de Centroides de Áreas Compuestas:<br>
Diseñado por: Carlos A. Zabaleta ID:0000-86425 Bogotá-Colombia<br>
Presentado a: Ingeniero Luis Ernesto Gomez Asignatura: Mecanica de Materiales<br>
Notas:<br>
Digite los datos a estudir en centímetros (cm)<br>
Si su figura de Área compuesta no presenta ninguna de las formas mencionadas anteriormente, simplemente digite cero (0)<br>
Centroides de Figuras usadas en este programa:<br>
Area Triangular: h/3<br>
Area Rectangular: h/2<br>
Area Semicircular 0.424414*r siend0 r=radio del círculo<br>
Disfrutelo mucho!<br>
Para ejecutar de nuevo el programa
<a href="#" onclick="document.location.reload(); return true;">recargue
ésta página</a>. Use punto para separación decimal.
</body>
</html>
...