blob: b5bb51ba986fed4c8b7789f4d8127f75e99ce46f (
plain)
1
2
3
4
5
6
7
8
9
10
|
clc;funcprot(0);//EXAMPLE 17.3
//page 530
// Initialisation of Variables
rho1=19.3;...........//Density of pure Tungsten in g/cm^3
rho2=10.49;............//Density of pure Silver in g/cm^3
f1=0.75;..............//Volume fraction of Tungsten
f2=0.25;...........//Volume fraction of Silver and pores
//Calculations
per=((f2*rho2)/((f2*rho2)+(f1*rho1)))*100;.........//Percentage weight of silver
disp(per,"Percentage Weight of Silver:")
|
