var radius=0;
var chord=0;
var seghgt=0;
var apo=0;
var arcAB=0;
var capradius=0;
var xnum=0;
var centang=0;
var centang2=0;
var theta=0;
var theta2=0;
var arclen=0;
var circum=0;
var caphgt=0;
var caparea=0;
var capvol=0;
var botarea=0;
var botvol=0;
var totarea=0;
var totvol=0;
var numout=0;
var segarea=0;
var triarea=0;
var secarea=0;
var totarea=0;
var inp1=0;
var inp2=0;
var chc=0;
var sigfig=4;
var incr=0;
var angratio=0;
var arc2crd=0;
var lbl=new Array("Zero", " Sphere Radius", " Chord AB",
" Spherical Cap Radius", " Cap Height 'H' ", " Spherical Cap Area", " Spherical Cap Volume",
" Arc AB", " Sphere Area (Bottom)", " Total Sphere Area",
" Sphere Volume (Bottom)", " Total Sphere Volume ")
var lblout=new Array();
var ans=new Array();
-->
document.form2.inp1.value=lblout[1];document.form2.inp1a.value="";
document.form2.inp2.value=lblout[2];document.form2.inp2a.value="";
document.form2.inp3.value=lblout[3];document.form2.inp3a.value="";
document.form2.inp4.value=lblout[4];document.form2.inp4a.value="";
document.form2.inp5.value=lblout[5];document.form2.inp5a.value="";
document.form2.inp6.value=lblout[6];document.form2.inp6a.value="";
document.form2.inp7.value=lblout[7];document.form2.inp7a.value="";
document.form2.inp8.value=lblout[8];document.form2.inp8a.value="";
document.form2.inp9.value=lblout[9];document.form2.inp9a.value="";
document.form2.inp10.value=lblout[10];document.form2.inp10a.value="";
document.form2.inp11.value=lblout[11];document.form2.inp11a.value="";
}
-->
incr=4;
ct=0;
while (ct<75){
angratio=(centang)/(2*Math.sin(centang/2));
if (angratio>arc2crd){incr=incr/2;centang=centang-incr}else{incr=incr*2;centang=centang+incr};
ct=ct+1;}
ct=0;
radius=(chord/2)/(Math.sin(centang/2));
ans[3]=radius;
ans[4]=chord/2;
apo=radius*radius - (chord/2)*(chord/2);apo=Math.sqrt(apo);
caphgt=radius-apo;
ans[7]=caphgt;
caparea=2*pival*radius*caphgt;
ans[5]=caparea;
capvol=(pival*caphgt*caphgt*(3*radius-caphgt))/3;
ans[6]=capvol;
totvol=(radius*radius*radius)*pival*(4/3);
ans[11]=totvol;
totarea=4*pival*(radius*radius);
ans[9]=totarea;
botarea=totarea-caparea;
ans[8]=botarea;
botvol=totvol-capvol;
ans[10]=botvol;
}
if (chc==2){radius=inp1;chord=inp2;
ans[3]=(chord*.5);
apo=Math.sqrt((radius*radius)-(chord*chord*.25));
caphgt=radius-apo;
ans[4]=caphgt;
caparea=2*pival*radius*caphgt;
ans[5]=caparea;
capvol=pival*caphgt*caphgt*(3*radius -caphgt)/3
ans[6]=capvol;
arcAB=((((Math.atan((inp2/2)/(apo))*180/pival)*2))/360)*2*pival*radius;
ans[7]=arcAB;
totvol=(radius*radius*radius)*pival*(4/3);
ans[11]=totvol;
totarea=4*pival*(radius*radius);
ans[9]=totarea;
botarea=totarea-caparea;
ans[8]=botarea;
botvol=totvol-capvol;
ans[10]=botvol;
}
if (chc==3){radius=inp1;caphgt=inp2;
apo=inp1-inp2;
chord=2*Math.sqrt((radius*radius)-(apo*apo))
ans[3]=chord;
ans[4]=chord/2;
caparea=2*pival*radius*caphgt;
ans[5]=caparea;
capvol=pival*caphgt*caphgt*(3*radius -caphgt)/3
ans[6]=capvol;
arcAB=2*pival*radius*((((Math.atan((chord/2)/(apo))*180/pival))*2)/360);
ans[7]=arcAB;
totvol=(radius*radius*radius)*pival*(4/3);
ans[11]=totvol;
totarea=4*pival*(radius*radius);
ans[9]=totarea;
botarea=totarea-caparea;
ans[8]=botarea;
botvol=totvol-capvol;
ans[10]=botvol;
}
if (chc==5){chord=inp1;caphgt=inp2;
capradius=chord/2;
xnum=((capradius*capradius)/caphgt);
radius=(xnum*1 + caphgt*1)/2;
ans[3]=radius;
ans[4]=capradius;
apo=radius-caphgt;
caparea=2*pival*radius*caphgt;
ans[5]=caparea;
capvol=pival*caphgt*caphgt*(3*radius -caphgt)/3
ans[6]=capvol;
arcAB=2*pival*radius*((((Math.atan((capradius)/(apo))*180/pival))*2)/360);
ans[7]=arcAB;
totvol=(radius*radius*radius)*pival*(4/3);
ans[11]=totvol;
totarea=4*pival*(radius*radius);
ans[9]=totarea;
botarea=totarea-caparea;
ans[8]=botarea;
botvol=totvol-capvol;
ans[10]=botvol;
}
// Rounding Routine
ct=3;
if (sigfig>-1);
{
while (ct<12){ans[ct]=ans[ct]*1;
ans[ct]=ans[ct].toExponential(sigfig);
if (ans[ct] >-1000 && ans[ct]<1000){ans[ct]=ans[ct]*1;}
ct=ct+1;}
}
document.form2.inp3a.value=" "+ans[3];
document.form2.inp4a.value=" "+ans[4];
document.form2.inp5a.value=" "+ans[5];
document.form2.inp6a.value=" "+ans[6];
document.form2.inp7a.value=" "+ans[7];
document.form2.inp8a.value=" "+ans[8];
document.form2.inp9a.value=" "+ans[9];
document.form2.inp10a.value=" "+ans[10];
document.form2.inp11a.value=" "+ans[11];
}
-->
Voor makkelijke berekening, deze calculator doet al het werk voor u.
Formule
1. Volume = 4 * π * R 3 / 3
2. Oppervlakte = 4 * π * R 2
3. Volume van gearceerde cap = π * h 2 * (3R - H) / 3
4. Oppervlakte van gearceerde dop = 2 * π * r * h
Als je de bolradius 'R' & Cap Hoogte 'H' weet, bijvoorbeeld, bolradius = 3, cap hoogte 'H' = 1
Klik vervolgens op "Bereken" akkoord AB = 4.4721, sferische dopstraal = 2.2361, bolvormig kap = 18.85, bolvormig kap volume = 8.3776, ARC AB = 5.0464, bolgebied (onderkant) = 94.248, totaal bolgebied = 113.1, bolvolume ( Bodem) = 104.72, totaal bolvolume = 113.1.
Hier kunt u uw berekening eenvoudiger maken.