SC15

BH=input("ความสูง Bench(m):");//รับความสูงหน้าผา
DT=input("Density of Rock in t/m^3:");//รับความหน้าแน่นหิน
EX=input("Exprosive density:");//รับความหน้าแน่นระเบิด]
N=input("จำนวนรูประเบิด: "); 
D=15*BH;//Hole Diameter
B=(30*D)/1000;//Burden
S=1.5*B;//Spacing
J=0.3*B//Subdrill
T=1*B;//Stemming
C=((BH+J)-T);//ระยะบรรจุระเบิด
BSR=BH/B//อัตราส่วนความสูงแล้วและBurden
L=BH+J;//ความลึกหลุมเจาะ
V=B*S*BH*N//Blast volume
Vr=B*S*BH//Volume หิน
BT=V*DT;//Blast tonnes
VB=%pi*(D^2/4000*L)//ปริมาตรรูระเบิด
LD=(VB*EX)/1000;//น้ำหนักระเบิดต่อหลุม
PF=(LD/Vr);//Powder factor
printf("\nHole Diameter = %.3f mm\n",D);
printf("Bench Height = %.3f m\n",BH);
printf("Burden = %.3f m\n",B);
printf("Spacing = %.3f m\n",S);
printf("Subdrill = %.3f m\n",J);
printf("Stemming = %.3f m\n",T);
printf("ระยะบรรจุระเบิด = %.3f m\n",C);
printf("อัตราส่วนความสูงแล้วและBurden = %.3f \n",BSR);
printf("ความลึกหลุมเจาะ = %.3f m\n",L);
printf("Blast volume = %.3f m^3\n",V);
printf("Volume หิน = %.3f m^3 \n",Vr);
printf("Blast tonnes = %.3f \n",BT);
printf("ปริมาตรรูระเบิด = %.3f m^3\n",VB);
printf("น้ำหนักระเบิดต่อหลุม = %.3f Kg \n",LD);
printf("Powder factor = %.3f Kg/m^3\n",PF);