diff options
Diffstat (limited to '1586/CH17/EX17.3/EX17_3.sce')
| -rw-r--r-- | 1586/CH17/EX17.3/EX17_3.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/1586/CH17/EX17.3/EX17_3.sce b/1586/CH17/EX17.3/EX17_3.sce new file mode 100644 index 000000000..9ecc54af4 --- /dev/null +++ b/1586/CH17/EX17.3/EX17_3.sce @@ -0,0 +1,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:")
|