1 files changed, 15 insertions, 0 deletions
diff --git a/3557/CH14/EX14.4/Ex14_4.sce b/3557/CH14/EX14.4/Ex14_4.sce
new file mode 100644
index 000000000..dc1d69047
--- /dev/null
+++ b/3557/CH14/EX14.4/Ex14_4.sce
@@ -0,0 +1,15 @@
+//Example 14.4//
+
+a0=1.0;//m^3 // composite
+d=a0-a
+mprintf("d= %f m^3",d)
+pA=2.70;//Mg/m^3 //density of aluminium (at 20degree C)
+a1=3.97;//Mg/m^3 //density of Al2O3
+a=0.1;//m^3 //meter //For 1m^3 we shall have 0.1m^3 of Al2O3
+ma=a1*a
+mprintf("\nma = %f Mg",ma)
+b=0.9;//m^3 //cubic meter
+ma1=pA*b
+mprintf("\nma1 = %f Mg",ma1)
+pc=(ma+ma1)
+mprintf("\npc = %f Mg/m^3",pc)