hw

D=input("Blast hole diamiter");
PD=input("Production");
DR=input("Density of rock");
Ed=input("Explosive density");
BH=D/15;
B=30*D;
S=1.15*B;
j=6*D;
C=L-st;
st=C;
BSR=BH/B;
L=BH+j;
VPH=B*S*BH;
N=PD/VPH;
V=B*S*BH*N;
T=V*DR;
Vb=(%pi*D^2)/(4000*L);
M=V*Ed;
PF=(M*N)/V;
AWS=input("absolute weight strength");
AOA=input("absolute weight strength of ANFO");
RWS=AWS/(AOA/100);
Ad=input("ANFO density");
RBS=(RWS*Ed)/Ad;
Ef=PF*RWS;
printf("\nBurden...%f\n",B);
printf("\nBench hight..%f\n",BH);
printf("\nspaceing...%f\n,"S);
printf("\nsub drill...%f",j);
printf("\nstemming...%f",st);
printf("\Charge lenght...%f",C);
printf("\Blast volume...%f",V);
printf("\Burden stiffness ratio...%f",BSR);
printf("\Blast tonnes...%f",T);
printf("\Volume of blasthole...%f",Vb);
printf("\Mass of explosive per hole...%f",M);
printf("\PF(kg/m^3)...%f",PF);
printf("\RWS...%f",RWS);
printf("\Energy factor...%f",Ef);