summaryrefslogtreecommitdiff
path: root/3557/CH14/EX14.1/Ex14_1.sce
blob: 1771639f2e0849ebd2ed1f627ff828d25d8be67a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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)