sl.18
clear De=input("density of rocks = "); D=input("diameter hole in mm = "); N=input("Number of hole = "); PF==input("powder factor = "); BH=D/15; B=30*D; S=1.15*B; J=10*D; St=B; BSR=BH/B; L=BH+J; C=L-J; V=B*S*BH*N; Vb=3.14*((D^2)/4000)*C; kg=Vb*PF; printf("Bench Height = %d\n",BH); printf("Berden = %d\n",B); printf("Spacing = %d\n",S); printf("Subdrill = %d\n",J); printf("Stemming = %d\n",St); printf("Burden stiffness ratio = %d\n",BSR); printf("Hole lenght = %d\n",L); printf("Charge length = %d\n",C); printf("Blast Volume = %d\n",V); printf("Volume of blasthole= %d\n",Vb); printf("Mass of explosive = %d\n",kg); if BSR>3.5 disp("Verrygood fragmentation"); else disp("Good fragmentation"); end