blob: 9ecc54af444741f4286eb8c02294ce4010f6c780 (
plain)
1
2
3
4
5
6
7
8
9
|
clc;funcprot(0);//EXAMPLE 17.3
// 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:")
|