initial commit / add all books

4 files changed, 49 insertions, 0 deletions

diff --git a/1985/CH8/EX8.1/Chapter8_Example1.sce b/1985/CH8/EX8.1/Chapter8_Example1.sce
new file mode 100755
index 000000000..92ad9d967
--- /dev/null
+++ b/1985/CH8/EX8.1/Chapter8_Example1.sce
@@ -0,0 +1,11 @@
+clc

+clear

+t=(1*10^-3)//Thickness of the crystal in m

+d=2650//Density of quartz in kg/m^3

+Y=(7.9*10^10)//Youngs modulus of quartz in N/m^2

+

+//Calculations

+f=((1/(2*t))*sqrt(Y/d))/10^6//Fundamental frequency of the quartz crystal in Hz *10^6

+

+//Output

+printf('Fundamental frequency of the quartz crystal is %3.3f *10^6 Hz',f)

diff --git a/1985/CH8/EX8.2/Chapter8_Example2.sce b/1985/CH8/EX8.2/Chapter8_Example2.sce
new file mode 100755
index 000000000..fc926c6a0
--- /dev/null
+++ b/1985/CH8/EX8.2/Chapter8_Example2.sce
@@ -0,0 +1,13 @@
+clc

+clear

+//Input data

+t=0.005//Length of the crystal in m

+Y=(7.9*10^10)//Youngs modulus in N/m^2

+d=2650//Density in kgm^3

+

+//Calculations

+f1=((1/(2*t))*sqrt(Y/d))/10^5//Fundamental vibration in Hz *10^5

+f2=2*f1/10//Frequency of first overcome in Hz *10^6 

+

+//Output

+printf('The frequency of the fundamental note is %3.2f *10^5 Hz \n The first overtone emitted by a piezoelectric crystal is %3.3f *10^6 Hz',f1,f2)

diff --git a/1985/CH8/EX8.3/Chapter8_Example3.sce b/1985/CH8/EX8.3/Chapter8_Example3.sce
new file mode 100755
index 000000000..2e4183a06
--- /dev/null
+++ b/1985/CH8/EX8.3/Chapter8_Example3.sce
@@ -0,0 +1,11 @@
+clc

+clear

+//Input data

+v=5000//Velocity of sound in steel in m/s

+f=(50*10^3)//Difference between two adjacent frequencies in Hz

+

+//Calculations

+d=(v/(2*f))//Thickness of the plate in m

+

+//Output

+printf('The thickness of the steel plate is %3.2f m',d)

diff --git a/1985/CH8/EX8.4/Chapter8_Example4.sce b/1985/CH8/EX8.4/Chapter8_Example4.sce
new file mode 100755
index 000000000..b00571725
--- /dev/null
+++ b/1985/CH8/EX8.4/Chapter8_Example4.sce
@@ -0,0 +1,14 @@
+clc

+clear

+//Input data

+//f=(2.87*10^3)/t The fundamental frequency in terms of thickness

+x=(2.87*10^3)//x value from function

+d=2660//Density in kg/m^3

+f=1200//Frequency of vibration in kHz

+

+//Calculations

+Y=(2*2*x^2*d)/10^10//Youngs modulus in N/m^2*10^10

+t=((1/(2*f*1000))*sqrt((Y*10^10)/d))/10^-3//Thickness in m*10^-3

+

+//Output

+printf('Youngs modulus of the quartz crystal is %3.2f *10^10 N/m^2 \n The thickness of the crystal is %3.2f *10^-3 m',Y,t)