Added new codeHEADmaster

12 files changed, 124 insertions, 0 deletions

diff --git a/3841/CH4/EX4.1/Ex4_1.sce b/3841/CH4/EX4.1/Ex4_1.sce
new file mode 100644
index 000000000..d731b2185
--- /dev/null
+++ b/3841/CH4/EX4.1/Ex4_1.sce
@@ -0,0 +1,9 @@
+Ex1 pg61
+clear
+//find the area piston for given parameters
+//given
+a=3.
+//diameter squared
+//calculation
+A=0.785*3**2
+printf("\n area of piston  %.2f ",A)
diff --git a/3841/CH4/EX4.10/Ex4_10.sce b/3841/CH4/EX4.10/Ex4_10.sce
new file mode 100644
index 000000000..b73aa58e6
--- /dev/null
+++ b/3841/CH4/EX4.10/Ex4_10.sce
@@ -0,0 +1,19 @@
+clear
+//given
+//find out power required to do in three cases:
+//
+w=150.
+d=8.
+Work=w*d
+printf("\n \n work necesary  %.2f ft-lb",Work)
+
+//case(1)
+t1=2.
+power=Work/t1
+Horsepower=power/550.
+printf("\n \n powe requiered  for time  %.2f ft-lb",power)
+//case(2)
+t2=8.
+power=Work/t2
+Horsepower=power/550.
+printf("\n \n for power requiered at t2  %.2f ft-lb per sec",power)
diff --git a/3841/CH4/EX4.11/Ex4_11.sce b/3841/CH4/EX4.11/Ex4_11.sce
new file mode 100644
index 000000000..a5d834890
--- /dev/null
+++ b/3841/CH4/EX4.11/Ex4_11.sce
@@ -0,0 +1,8 @@
+clear
+//find the electric generator to takes 150 kn
+//given
+//
+g=150.
+a=1.341
+p=g*a
+printf("\n \n equilient horse power %.2f hp",p)
diff --git a/3841/CH4/EX4.12/Ex4_12.sce b/3841/CH4/EX4.12/Ex4_12.sce
new file mode 100644
index 000000000..70bb5733f
--- /dev/null
+++ b/3841/CH4/EX4.12/Ex4_12.sce
@@ -0,0 +1,15 @@
+clear
+//find the work done by exhaust gases
+//given
+//
+w=500.
+v1=9000.
+v2=5400.
+t=60.
+V1=v1/t
+V2=v2/t
+hp=32.2
+KE1=(1/2.)*(500/32.2)*(150**2)
+KE2=(1/2.)*(500/32.2)*(90**2)
+W=KE1-KE2
+printf("\n \n workdone %.2f ft-lb",W)
diff --git a/3841/CH4/EX4.2/Ex4_2.sce b/3841/CH4/EX4.2/Ex4_2.sce
new file mode 100644
index 000000000..601182b14
--- /dev/null
+++ b/3841/CH4/EX4.2/Ex4_2.sce
@@ -0,0 +1,10 @@
+
+//given
+//find the area of piston and displacement of that piston
+a=3.
+b=4.
+A=0.785*3**2
+printf("\n area of piston  %.2f ",A)
+D=A*b
+//by using above results
+printf("\n displacement of piston  %.2f cu in",D)
diff --git a/3841/CH4/EX4.3/Ex4_3.sce b/3841/CH4/EX4.3/Ex4_3.sce
new file mode 100644
index 000000000..0c334b737
--- /dev/null
+++ b/3841/CH4/EX4.3/Ex4_3.sce
@@ -0,0 +1,10 @@
+Ex3 pg63
+clear
+//given
+//find the piston speed
+pa=9.
+S=1600.
+//average piston velocity =distance traveld/time to travel
+//first divide by 1 min and u will get same result late divide by 12 because to express per minute
+Ps=(pa*S)/(12.)
+printf("\n \n piston speed  %.2f ft per min",Ps)
diff --git a/3841/CH4/EX4.4/Ex4_4.sce b/3841/CH4/EX4.4/Ex4_4.sce
new file mode 100644
index 000000000..5fee7864c
--- /dev/null
+++ b/3841/CH4/EX4.4/Ex4_4.sce
@@ -0,0 +1,10 @@
+clear
+//given
+//compute the average acceleration  `
+//pressure= force/area
+//first express the velocity in ft per sec.time
+t=5.
+v=9000.
+Min=(9000./60.)
+Aa=(Min/t)
+printf("\n \n average acceleration %.2f ft per sec^2",Aa)
diff --git a/3841/CH4/EX4.5/Ex4_5.sce b/3841/CH4/EX4.5/Ex4_5.sce
new file mode 100644
index 000000000..a1227213d
--- /dev/null
+++ b/3841/CH4/EX4.5/Ex4_5.sce
@@ -0,0 +1,9 @@
+clear
+//compute the pressure force
+//given
+w=12000.
+p=6.
+a=10**2
+f=p*a
+P=w/f
+printf("\n \n pressure   %.2f Psi",P)
diff --git a/3841/CH4/EX4.6/Ex4_6.sce b/3841/CH4/EX4.6/Ex4_6.sce
new file mode 100644
index 000000000..c7fa3e404
--- /dev/null
+++ b/3841/CH4/EX4.6/Ex4_6.sce
@@ -0,0 +1,10 @@
+clear
+//given
+//compute the gas force action on pistion
+//use the figure to compute it
+p=500.
+D=5**2
+//force=pressure*area
+area=0.785*D
+F=p*area
+printf("\n \n force  %.2f lb",F)
diff --git a/3841/CH4/EX4.7/Ex4_7.sce b/3841/CH4/EX4.7/Ex4_7.sce
new file mode 100644
index 000000000..773e45003
--- /dev/null
+++ b/3841/CH4/EX4.7/Ex4_7.sce
@@ -0,0 +1,8 @@
+clear
+//given
+//find the ratio of weight of certain volume
+Oil=1*8.34
+g=0.89
+//weight of the oil equal to weight of 1 gal
+w=Oil*g
+printf("\n \n wegiht of gal  %.2f lb per gal",w)
diff --git a/3841/CH4/EX4.8/Ex4_8.sce b/3841/CH4/EX4.8/Ex4_8.sce
new file mode 100644
index 000000000..b3e100a6c
--- /dev/null
+++ b/3841/CH4/EX4.8/Ex4_8.sce
@@ -0,0 +1,8 @@
+clear
+//given
+//find out what is mass of an engine piston that wieghs
+w=55.
+//mass weight divide  by 32.2
+//because it convets to lb
+M=w/32.2
+printf("\n \n mass of an engine %.2f lb",M)
diff --git a/3841/CH4/EX4.9/Ex4_9.sce b/3841/CH4/EX4.9/Ex4_9.sce
new file mode 100644
index 000000000..1a30ac894
--- /dev/null
+++ b/3841/CH4/EX4.9/Ex4_9.sce
@@ -0,0 +1,8 @@
+clear
+//find the work neccasry to raise a weight
+//given
+//
+w=150.
+d=8.
+Work=w*d
+printf("\n \n work necesary  %.2f ft-lb",Work)