summaryrefslogtreecommitdiff
path: root/2381/CH7
diff options
context:
space:
mode:
Diffstat (limited to '2381/CH7')
-rwxr-xr-x2381/CH7/EX7.1/ex_1.sce10
-rwxr-xr-x2381/CH7/EX7.10/ex_10.sce13
-rwxr-xr-x2381/CH7/EX7.11/ex_11.sce10
-rwxr-xr-x2381/CH7/EX7.12/ex_12.sce8
-rwxr-xr-x2381/CH7/EX7.13/ex_13.sce8
-rwxr-xr-x2381/CH7/EX7.18/ex_18.sce14
-rwxr-xr-x2381/CH7/EX7.2/ex_2.sce16
-rwxr-xr-x2381/CH7/EX7.24/ex_24.sce12
-rwxr-xr-x2381/CH7/EX7.25/ex_25.sce10
-rwxr-xr-x2381/CH7/EX7.3/ex_3.sce11
-rwxr-xr-x2381/CH7/EX7.4/ex_4.sce10
-rwxr-xr-x2381/CH7/EX7.5/ex_5.sce11
-rwxr-xr-x2381/CH7/EX7.6/ex_6.sce9
-rwxr-xr-x2381/CH7/EX7.7/ex_7.sce9
-rwxr-xr-x2381/CH7/EX7.8/ex_8.sce10
-rwxr-xr-x2381/CH7/EX7.9/ex_9.sce12
16 files changed, 173 insertions, 0 deletions
diff --git a/2381/CH7/EX7.1/ex_1.sce b/2381/CH7/EX7.1/ex_1.sce
new file mode 100755
index 000000000..2951d7f42
--- /dev/null
+++ b/2381/CH7/EX7.1/ex_1.sce
@@ -0,0 +1,10 @@
+//Example 1 // ratio
+clc;
+clear;
+close;
+ri=9/16;//ratio of intensities
+ra=sqrt(ri);//ratio of amplitude
+a1=1;//assume
+a2=ra*a1;//
+rim=(a1+a2)^2/(a1-a2)^2;//
+disp("ratio of maximum intensity and minimum intensity in fringe system is "+string(rim)+":"+string(a1)+"")
diff --git a/2381/CH7/EX7.10/ex_10.sce b/2381/CH7/EX7.10/ex_10.sce
new file mode 100755
index 000000000..597e4cdde
--- /dev/null
+++ b/2381/CH7/EX7.10/ex_10.sce
@@ -0,0 +1,13 @@
+//Example 10 // Frequency
+clc;
+clear;
+close
+b1=10;//beats per second
+f1=300;//Hz
+b2=15;//beats per second
+f2=325;//Hz
+n1=f1-b1;//Hz
+n2=f1+b1;//Hz
+n3=f2-b2;//Hz
+n4=f2+b2;//Hz
+disp(n2,"frequency is,(Hz)=")
diff --git a/2381/CH7/EX7.11/ex_11.sce b/2381/CH7/EX7.11/ex_11.sce
new file mode 100755
index 000000000..450957af3
--- /dev/null
+++ b/2381/CH7/EX7.11/ex_11.sce
@@ -0,0 +1,10 @@
+//Example 11 // Velocity of sound
+clc;
+clear;
+close;
+//given data :
+lamda1=5;// in m
+lamda2=5.5;// in m
+a=6;// beats/sec
+v=a/((lamda2-lamda1)/(lamda1*lamda2));
+disp(v,"The velocity of sound,v(m/s) = ")
diff --git a/2381/CH7/EX7.12/ex_12.sce b/2381/CH7/EX7.12/ex_12.sce
new file mode 100755
index 000000000..7efb32e66
--- /dev/null
+++ b/2381/CH7/EX7.12/ex_12.sce
@@ -0,0 +1,8 @@
+//Example 12 // Frequency
+clc;
+clear;
+close
+b1=5;//beats per second
+fr=384;//Hz
+fo=fr-b1;//Hz
+disp(fo,"frequency is,(Hz)=")
diff --git a/2381/CH7/EX7.13/ex_13.sce b/2381/CH7/EX7.13/ex_13.sce
new file mode 100755
index 000000000..38dcb0465
--- /dev/null
+++ b/2381/CH7/EX7.13/ex_13.sce
@@ -0,0 +1,8 @@
+//Example 13 // Frequency
+clc;
+clear;
+close
+b1=4;//beats per second
+fr=256;//Hz
+fo=fr+b1;//Hz
+disp(fo,"frequency is,(Hz)=")
diff --git a/2381/CH7/EX7.18/ex_18.sce b/2381/CH7/EX7.18/ex_18.sce
new file mode 100755
index 000000000..334de6e7f
--- /dev/null
+++ b/2381/CH7/EX7.18/ex_18.sce
@@ -0,0 +1,14 @@
+//Example 18 //Frequency,wavelength, velocity and amplitude
+clc;
+clear;
+close;
+//given data :
+a=6;// in cm
+lamda=10;// in cm
+T=1/10;// in sec
+disp(lamda,"Wavelength of progressive wave,(cm) = ")
+n=1/T;
+disp(n,"Frequency of progressive wave,n(per sec)")
+v=n*lamda;
+disp(v,"The velocity,v(cm/s) = ")
+disp(a,"The amplitude,a(cm) = ")
diff --git a/2381/CH7/EX7.2/ex_2.sce b/2381/CH7/EX7.2/ex_2.sce
new file mode 100755
index 000000000..c7b914e83
--- /dev/null
+++ b/2381/CH7/EX7.2/ex_2.sce
@@ -0,0 +1,16 @@
+//Example 2 // intensity
+clc;
+clear;
+close;
+I=1;//assume
+a1=1*I;//
+a2=4*I;//
+ph1=0;//degree
+i1=(a1+a2)+a2*cosd(ph1);//
+disp("intensity where phase difference is zero is "+string(i1)+"*I")
+ph2=90;//degree
+i2=(a1+a2)+a2*cosd(ph2);//
+disp("intensity where phase difference is pi/2 is "+string(i2)+"*I")
+ph3=180;//degree
+i3=(a1+a2)+a2*cosd(ph3);//
+disp("intensity where phase difference is pi is "+string(i3)+"*I")
diff --git a/2381/CH7/EX7.24/ex_24.sce b/2381/CH7/EX7.24/ex_24.sce
new file mode 100755
index 000000000..b2cbb1c1a
--- /dev/null
+++ b/2381/CH7/EX7.24/ex_24.sce
@@ -0,0 +1,12 @@
+//Example 24 //Velocity
+clc;
+clear;
+close;
+//given data :
+c=3*10^8;// in m/s
+lamda1=4000;// in Angustrom
+lamda2=5000;// in Aungustrom
+mu1=1.540;
+mu2=1.530;
+vg=c*((mu1*lamda1)-(mu2*lamda2))/(mu1*mu2*(lamda1-lamda2));
+disp(vg,"The velocity,vg(m/s) = ")
diff --git a/2381/CH7/EX7.25/ex_25.sce b/2381/CH7/EX7.25/ex_25.sce
new file mode 100755
index 000000000..d429bb823
--- /dev/null
+++ b/2381/CH7/EX7.25/ex_25.sce
@@ -0,0 +1,10 @@
+//Example 25 //Velocity
+clc;
+clear;
+close;
+//given data :
+v=1.8*10^8;// in m/s
+lamda=3.6*10^-7;// in m
+dv_dlamda=3.8*10^13;// in per sec
+vg=v-(lamda*dv_dlamda);
+disp(vg,"The group velocity,vg(m/s) = ")
diff --git a/2381/CH7/EX7.3/ex_3.sce b/2381/CH7/EX7.3/ex_3.sce
new file mode 100755
index 000000000..f1510ac18
--- /dev/null
+++ b/2381/CH7/EX7.3/ex_3.sce
@@ -0,0 +1,11 @@
+//Example 3 // Wavelength and frequency
+clc;
+clear;
+close;
+//given data :
+d=30;// in cm
+lamda=2*d*10^-2;
+v=330;// in m/s
+disp(lamda,"The wavelength,(m) = ")
+n=v/lamda;
+disp(n,"The frequency,n(vibrations/s) = ")
diff --git a/2381/CH7/EX7.4/ex_4.sce b/2381/CH7/EX7.4/ex_4.sce
new file mode 100755
index 000000000..21c643db3
--- /dev/null
+++ b/2381/CH7/EX7.4/ex_4.sce
@@ -0,0 +1,10 @@
+//Example 4 // number of beats and time interval
+clc;
+clear;
+close;
+n1=300;//Hz
+n2=303;//Hz
+bfs=n2-n1;//
+disp(bfs,"beat frequency per second is,=")
+ti=1/bfs;//second
+disp(ti,"time interval is,(second)=")
diff --git a/2381/CH7/EX7.5/ex_5.sce b/2381/CH7/EX7.5/ex_5.sce
new file mode 100755
index 000000000..ebf33b0da
--- /dev/null
+++ b/2381/CH7/EX7.5/ex_5.sce
@@ -0,0 +1,11 @@
+//Example 5 // Frequency
+clc;
+clear;
+close;
+//given data :
+n1=256;// in Hz
+x=4;// in beats per sec
+n2a=n1+x;
+n2b=n1-x;
+disp(n2a,"The frequency,n2a(Hz) = ")
+disp(n2b,"The frequency,n2b(Hz) = ")
diff --git a/2381/CH7/EX7.6/ex_6.sce b/2381/CH7/EX7.6/ex_6.sce
new file mode 100755
index 000000000..c8bc9e386
--- /dev/null
+++ b/2381/CH7/EX7.6/ex_6.sce
@@ -0,0 +1,9 @@
+//Example 6 // Frequency
+clc;
+clear;
+close;
+//given data :
+nA=256;// in Hz
+x=5;// in beats per sec
+nB=nA+x;
+disp(nB,"The frequency,nB(Hz) = ")
diff --git a/2381/CH7/EX7.7/ex_7.sce b/2381/CH7/EX7.7/ex_7.sce
new file mode 100755
index 000000000..229536ffa
--- /dev/null
+++ b/2381/CH7/EX7.7/ex_7.sce
@@ -0,0 +1,9 @@
+//Example 7 // Frequency
+clc;
+clear;
+close;
+//given data :
+nB=512;// in Hz
+x=5;// in beats per sec
+nA=nB+x;
+disp(nA,"The frequency of A,nA(Hz) = ")
diff --git a/2381/CH7/EX7.8/ex_8.sce b/2381/CH7/EX7.8/ex_8.sce
new file mode 100755
index 000000000..410905fe2
--- /dev/null
+++ b/2381/CH7/EX7.8/ex_8.sce
@@ -0,0 +1,10 @@
+//Example 8 // Velocity of sound
+clc;
+clear;
+close;
+//given data :
+lamda1=1;// in m
+lamda2=1.01;// in m
+a=10/3;// in beats/sec
+v=a/((lamda2-lamda1)/(lamda1*lamda2));
+disp(v,"The velocity of sound,v(m/s) = ")
diff --git a/2381/CH7/EX7.9/ex_9.sce b/2381/CH7/EX7.9/ex_9.sce
new file mode 100755
index 000000000..8184b2a3b
--- /dev/null
+++ b/2381/CH7/EX7.9/ex_9.sce
@@ -0,0 +1,12 @@
+//Example 9 // Frequency
+clc;
+clear;
+close;
+n=273;//
+b1=4;//beats per second
+b2=b1-1;//
+t1=15;//degree celsius
+t2=10;//degree celsius
+v1510=sqrt((n+t1)/(n+t2));//
+n=((b2*v1510-b1)/(1-v1510));//
+disp(n,"frequency is,(Hz)=")
generated by cgit (git 2.34.1) at 2024-12-20 16:48:33 +0000