1 files changed, 18 insertions, 0 deletions
diff --git a/3557/CH14/EX14.1/Ex14_1.sce b/3557/CH14/EX14.1/Ex14_1.sce
new file mode 100644
index 000000000..1771639f2
--- /dev/null
+++ b/3557/CH14/EX14.1/Ex14_1.sce
@@ -0,0 +1,18 @@
+//Example 14.1//
+
+//(a)=The mass of each component will be
+a=1.00;//m^3 //composite
+b=0.70;//m^3 //Vol % E-glass fibers
+c=a-b
+mprintf("c = %f m^3",c)
+d=2.54;//Mg/m^3 //density Of E-glass
+mg=d*b
+mprintf("\nmg = %f Mg",mg)
+e=1.1;//Mg/m^3 //density of epoxy
+me=e*c
+mprintf("\nme = %f Mg",me)
+w=(mg/(mg+me))*100
+mprintf("\nw = %f percent",w)
+//(b)= The density will be given by
+p=mg+me
+mprintf("\np = %f Mg/m^3",p)