summaryrefslogtreecommitdiff
path: root/2381/CH1
diff options
context:
space:
mode:
Diffstat (limited to '2381/CH1')
-rwxr-xr-x2381/CH1/EX1.1/ex_1.sce13
-rwxr-xr-x2381/CH1/EX1.10/ex_10.sce7
-rwxr-xr-x2381/CH1/EX1.11/ex_11.sce16
-rwxr-xr-x2381/CH1/EX1.12/ex_12.sce12
-rwxr-xr-x2381/CH1/EX1.13/ex_13.sce12
-rwxr-xr-x2381/CH1/EX1.15/ex_15.sce13
-rwxr-xr-x2381/CH1/EX1.16/ex_16.sce17
-rwxr-xr-x2381/CH1/EX1.17/ex_17.sce16
-rwxr-xr-x2381/CH1/EX1.19/ex_19.sce16
-rwxr-xr-x2381/CH1/EX1.20/ex_20.sce15
-rwxr-xr-x2381/CH1/EX1.21/ex_21.sce17
-rwxr-xr-x2381/CH1/EX1.22/ex_22.sce13
-rwxr-xr-x2381/CH1/EX1.23/ex_23.sce14
-rwxr-xr-x2381/CH1/EX1.24/ex_24.sce12
-rwxr-xr-x2381/CH1/EX1.3/ex_3.sce9
-rwxr-xr-x2381/CH1/EX1.4/ex_4.sce14
-rwxr-xr-x2381/CH1/EX1.5/ex_5.sce11
-rwxr-xr-x2381/CH1/EX1.6/ex_6.sce13
-rwxr-xr-x2381/CH1/EX1.7/ex_7.sce13
-rwxr-xr-x2381/CH1/EX1.8/ex_8.sce13
-rwxr-xr-x2381/CH1/EX1.9/ex_9.sce33
21 files changed, 299 insertions, 0 deletions
diff --git a/2381/CH1/EX1.1/ex_1.sce b/2381/CH1/EX1.1/ex_1.sce
new file mode 100755
index 000000000..278b0e7ab
--- /dev/null
+++ b/2381/CH1/EX1.1/ex_1.sce
@@ -0,0 +1,13 @@
+//Example 1 // FREQUENCY AND TIME PERIOD
+clc;
+clear;
+close;
+format('v',6)
+//ph=50*x^2+100 in joule/kg
+m=10;//mass in kg
+f=10^3/m;//joule/kg
+w=sqrt(f);//oscillations
+fr=w/(2*%pi);//oscillations/sec
+tp=1/fr;//seconds
+disp(fr,"frequency of oscillation is ,(oscillations/seconds)=")
+disp(tp,"time period is,(seconds)=")
diff --git a/2381/CH1/EX1.10/ex_10.sce b/2381/CH1/EX1.10/ex_10.sce
new file mode 100755
index 000000000..faaf4af36
--- /dev/null
+++ b/2381/CH1/EX1.10/ex_10.sce
@@ -0,0 +1,7 @@
+//Example 10 // ENERGY
+clc;
+clear;
+close;
+t=8/3;//seconds
+v=-10*%pi*sin((35*%pi)/6)//cm
+disp(v,"velocity is,(cm)=")
diff --git a/2381/CH1/EX1.11/ex_11.sce b/2381/CH1/EX1.11/ex_11.sce
new file mode 100755
index 000000000..9aa473d35
--- /dev/null
+++ b/2381/CH1/EX1.11/ex_11.sce
@@ -0,0 +1,16 @@
+//Example 11 //
+clc;
+clear;
+close;
+//given data :
+K1=3;// in N/m
+K2=2;// in N/m
+m=0.050;// in kg
+w=sqrt((K1+K2)/m);
+n=w/(2*%pi);
+disp(n,"(i). The frequency,n(oscillations/sec) = ")
+A=0.004;// in m
+E=(1/2)*A^2*(K1+K2);
+disp(E,"(ii). The energy,E(J) = ")
+v=sqrt(2*E/m);
+disp(v,"(iii). The velocity,v(m/s) = ")
diff --git a/2381/CH1/EX1.12/ex_12.sce b/2381/CH1/EX1.12/ex_12.sce
new file mode 100755
index 000000000..8a86bd224
--- /dev/null
+++ b/2381/CH1/EX1.12/ex_12.sce
@@ -0,0 +1,12 @@
+//Example 12 // Rotational inertia
+clc;
+clear;
+close;
+//given data :
+M=0.1;// in m
+l=0.1;// in m
+I1=M*l^2/12;// in kg-m^2
+T1=2;// in s
+T2=6;// in s
+I2=(I1*T2^2)/T1^2;
+disp(I2,"Rotational inertia,I2(kg.m^2) = ")
diff --git a/2381/CH1/EX1.13/ex_13.sce b/2381/CH1/EX1.13/ex_13.sce
new file mode 100755
index 000000000..f6270c7ac
--- /dev/null
+++ b/2381/CH1/EX1.13/ex_13.sce
@@ -0,0 +1,12 @@
+//Example 13 // Time period
+clc;
+clear;
+close;
+//given data :
+M=4;// in kg
+R=0.10;// in m
+I=(2/5)*M*R^2;// in kg.m^2
+C=4*10^-3;// in Nm/radian
+T=2*%pi*sqrt(I/C);
+disp(T,"Time period,T(s) = ")
+// answer is wrong in textbook
diff --git a/2381/CH1/EX1.15/ex_15.sce b/2381/CH1/EX1.15/ex_15.sce
new file mode 100755
index 000000000..c48a683eb
--- /dev/null
+++ b/2381/CH1/EX1.15/ex_15.sce
@@ -0,0 +1,13 @@
+//Example 15 // Energy
+clc;
+clear;
+close;
+//given data :
+L=10*10^-3;// in H
+C=20*10^-6;// in F
+n=1/(2*%pi*sqrt(L*C));
+V=10;//in V
+U=(1/2)*C*V^2;
+disp(n,"Frequency,n(cycles/s) = ")
+disp(U,"Energy of oscillations,U(J) = ")
+//answer of frequency is calculated wrong in textbook
diff --git a/2381/CH1/EX1.16/ex_16.sce b/2381/CH1/EX1.16/ex_16.sce
new file mode 100755
index 000000000..8ccc4ee65
--- /dev/null
+++ b/2381/CH1/EX1.16/ex_16.sce
@@ -0,0 +1,17 @@
+//Example 16 // distance,binding energy and force constant
+clc;
+clear;
+close;
+disp("equilibrium inter-nuclear distance correspondes to lowest potential enegy is ro= 2*Å")
+pet=0;//eV
+peb=-4;//eV
+be=pet-peb;//eV
+x1=-2;//eV
+x2=-4;//eV
+V=x1-x2;//eV
+e=1.6*10^-19;//electronic charge
+x=0.5;//armstrong
+K=((2*V)/x^2);//eV/Å^2
+k1=(K*e)/(10^-10)^2;//joule/m^2
+disp(be,"binding energy is ,(eV)=")
+disp(k1,"force constant is ,(newton/metre)=")
diff --git a/2381/CH1/EX1.17/ex_17.sce b/2381/CH1/EX1.17/ex_17.sce
new file mode 100755
index 000000000..c13f58466
--- /dev/null
+++ b/2381/CH1/EX1.17/ex_17.sce
@@ -0,0 +1,16 @@
+//Example 17 // possible values and energy
+clc;
+clear;
+close;
+r1=2;//from graph
+r2=4.5;//units from graph
+disp("possible values of r are "+string(r1)+" units and "+string(r2)+" units")
+osc=1-(-2.5);//units
+disp("maximum energy of oscillations for r=2 units is "+string(osc)+" units ")
+osc1=0.5-(-1);//units
+disp("maximum energy of oscillations for r=4.5 units is "+string(osc1)+" units ")
+t=1;//from graph
+v=0;//from graph
+e=t+v;//
+disp(e,"total energy is,(unit)=")
+disp("at infinity V = "+string(v)+" therefore T = "+string(t)+" unit ")
diff --git a/2381/CH1/EX1.19/ex_19.sce b/2381/CH1/EX1.19/ex_19.sce
new file mode 100755
index 000000000..f770715d6
--- /dev/null
+++ b/2381/CH1/EX1.19/ex_19.sce
@@ -0,0 +1,16 @@
+//Example 19 // Frequency
+clc;
+clear;
+close;
+//given data :
+m1=10;// in g
+m2=90;// in g
+K=10^3;// in N/m
+mu=m1*m2*10^-3/(m1+m2);
+n=round(sqrt(K/mu)/(2*%pi));
+disp(n," The frequency,n(oscillations/sec) = ")
+x1=0;//
+x2=10;//cm
+xb=((m1*x1+m2*x2)/(m1+m2));//cm
+mo=(m1*10^-3)*(xb*10^-2)^2+(m2*10^-3)*(1*10^-2)^2;//
+disp(mo,"moment of inertia is ,(kg-m^2)=")
diff --git a/2381/CH1/EX1.20/ex_20.sce b/2381/CH1/EX1.20/ex_20.sce
new file mode 100755
index 000000000..683056ef7
--- /dev/null
+++ b/2381/CH1/EX1.20/ex_20.sce
@@ -0,0 +1,15 @@
+//Example 20 // frequency and amplitude
+clc;
+clear;
+close;
+c=10^-4;//N-m
+m1=9;//gm
+m2=1;//gm
+mu=((m1*m2)/(m1+m2))*10^-3;//kg
+r=20;//cm
+I=mu*(r*10^-2)^2;//kg-m^2
+fr=((1/(2*%pi))*sqrt(c/I));//vibrations/sec
+disp(fr,"frequency of vibration is ,(vibrations/s)=")
+e=10^-2;//joule
+thmax=sqrt((2*e)/c);//radians
+disp(thmax,"amplitude is,(radians)=")
diff --git a/2381/CH1/EX1.21/ex_21.sce b/2381/CH1/EX1.21/ex_21.sce
new file mode 100755
index 000000000..beef3e448
--- /dev/null
+++ b/2381/CH1/EX1.21/ex_21.sce
@@ -0,0 +1,17 @@
+//Example 21 // frequency ,energy and maximum velocity
+clc;
+clear;
+close;
+c=1;//N-m
+m1=6;//gm
+m2=2;//gm
+mu=((m1*m2)/(m1+m2))*10^-3;//kg
+fr=((1/(2*%pi))*sqrt(c/mu));//vibrations/sec
+disp(fr,"frequency of oscillations is ,(vibrations/s)=")
+td= 1+(1/3);//cm
+e=((1/2)*c*(td*10^-2)^2);//joule
+disp(e,"energy is,(joule)=")
+y=((1/2)*m2*10^-3)+((1/2)*(1/3)^2*m1*10^-3);//
+v1=sqrt((e/y));//m/sec
+disp(v1,"maximum velocity of smaller mass is,(m/seconds)=")
+//velocity is calculated wrong in the book
diff --git a/2381/CH1/EX1.22/ex_22.sce b/2381/CH1/EX1.22/ex_22.sce
new file mode 100755
index 000000000..ddf259bc2
--- /dev/null
+++ b/2381/CH1/EX1.22/ex_22.sce
@@ -0,0 +1,13 @@
+//Example 22 // frequency
+clc;
+clear;
+close;
+k=100;//N/m
+m=100;//gm
+n1=((1/(2*%pi))*sqrt(k/(m*10^-3)));//sec^-1
+m1=100;//gm
+m2=200;//gm
+mu=((m1*m2)/(m1+m2))*10^-3;//kg
+fr=((1/(2*%pi))*sqrt(k/mu));//sec^-1
+disp(n1,"in first case frequency is,(sec^-1)=")
+disp(fr,"in second case frequency is,(sec^-1)=")
diff --git a/2381/CH1/EX1.23/ex_23.sce b/2381/CH1/EX1.23/ex_23.sce
new file mode 100755
index 000000000..4d890ee81
--- /dev/null
+++ b/2381/CH1/EX1.23/ex_23.sce
@@ -0,0 +1,14 @@
+//Example 23 // force constant and work done
+clc;
+clear;
+close;
+m1=1;//assume
+m2=19;//assume
+mh=1.66*10^-27;//kg
+mu=((m1*m2)/(m1+m2))*mh;//kg
+w=7.55*10^14;//radians/sec
+k=mu*(w)^2;//N/m
+disp(k,"force constant is,(N/m)=")
+x=0.5;//arngstrom
+wh=((1/2)*k*(x*10^-10)^2);//joule
+disp(wh,"work done is ,(joule)=")
diff --git a/2381/CH1/EX1.24/ex_24.sce b/2381/CH1/EX1.24/ex_24.sce
new file mode 100755
index 000000000..e5258cc26
--- /dev/null
+++ b/2381/CH1/EX1.24/ex_24.sce
@@ -0,0 +1,12 @@
+//Example 24 // frequency
+clc;
+clear;
+close;
+m1=1;//a.m.u
+m2=35;//a.m.u
+mu1=((m1*m2)/(m1+m2));//a.m.u
+m3=2;//
+mu2=((m3*m2)/(m3+m2));//a.m.u
+n1=8.99*10^13;//cycle/sec
+n2=(sqrt(mu1/mu2))*n1;//c/s
+disp(n2,"frequecy of vibrations is ,(c/s)=")
diff --git a/2381/CH1/EX1.3/ex_3.sce b/2381/CH1/EX1.3/ex_3.sce
new file mode 100755
index 000000000..4f109bb7c
--- /dev/null
+++ b/2381/CH1/EX1.3/ex_3.sce
@@ -0,0 +1,9 @@
+//Example 3 // ENERGY
+clc;
+clear;
+close;
+ke=5;//joule
+pe=5;//joule
+rep=10;//joule
+eo=rep+ke+pe;//joule
+disp(eo,"energy of the oscillator is,(joule)=")
diff --git a/2381/CH1/EX1.4/ex_4.sce b/2381/CH1/EX1.4/ex_4.sce
new file mode 100755
index 000000000..3c2f067d7
--- /dev/null
+++ b/2381/CH1/EX1.4/ex_4.sce
@@ -0,0 +1,14 @@
+//Example 4 // peroid ,maximum velocity and acceleration
+clc;
+clear;
+close;
+a=3;//cm
+b=4;//cm
+A=sqrt(a^2+b^2);//cm
+w=2;//sec^-1
+T=(2*%pi)/w;//seconds
+um=w*A;//cm/s
+am=w^2*A;//cm/s^2
+disp(T,"time period is ,(seconds)=")
+disp(um,"maximum velocity is,(cm/s)=")
+disp(am,"maximum acceleration is,(cm/s^2)=")
diff --git a/2381/CH1/EX1.5/ex_5.sce b/2381/CH1/EX1.5/ex_5.sce
new file mode 100755
index 000000000..e34f25683
--- /dev/null
+++ b/2381/CH1/EX1.5/ex_5.sce
@@ -0,0 +1,11 @@
+//Example 5 // maximum velocity and acceleration
+clc;
+clear;
+close;
+A=5;//cm
+T=31.4//seconds
+w=(2*%pi)/T;//sec^-1
+um=w*A;//cm/s
+am=w^2*A;//cm/s^2
+disp(um,"maximum velocity is,(cm/s)=")
+disp(am,"maximum acceleration is,(cm/s^2)=")
diff --git a/2381/CH1/EX1.6/ex_6.sce b/2381/CH1/EX1.6/ex_6.sce
new file mode 100755
index 000000000..35b65d7b4
--- /dev/null
+++ b/2381/CH1/EX1.6/ex_6.sce
@@ -0,0 +1,13 @@
+//Example 6 // Period
+clc;
+clear;
+close;
+//given data :
+g=9.8;// constant
+l=1;// in m
+theta_m1=60;// in degree
+theta_m=%pi/3;// in radians
+T0=round(2*%pi*sqrt(l/g));
+disp(T0,"(a). Time period for small displacement,T0(seconds) = ")
+T=T0*(1+(theta_m^2/16));
+disp(T,"(b).Time period,T(seconds) = ")
diff --git a/2381/CH1/EX1.7/ex_7.sce b/2381/CH1/EX1.7/ex_7.sce
new file mode 100755
index 000000000..7271c0075
--- /dev/null
+++ b/2381/CH1/EX1.7/ex_7.sce
@@ -0,0 +1,13 @@
+//Example 7 // ENERGY
+clc;
+clear;
+close;
+es=1;//joule
+l=2;//metre
+am=3;//cm
+am1=5;//cm
+e1=(am1^2/am^2)*es;//joules
+l2=1;//meter
+e2=(l/l2)*es;//joules
+disp(e1,"energy in first case is,(joules)=")
+disp(e2,"energy in second case is,(joules)= ")
diff --git a/2381/CH1/EX1.8/ex_8.sce b/2381/CH1/EX1.8/ex_8.sce
new file mode 100755
index 000000000..43bbb56d4
--- /dev/null
+++ b/2381/CH1/EX1.8/ex_8.sce
@@ -0,0 +1,13 @@
+//Example 8 // Period of motion
+clc;
+clear;
+close;
+//given data :
+x=0.16;// in m
+m1=4;// in kg
+g=9.8;
+K=m1*g/x;
+m=0.50;// in kg
+T=2*%pi*sqrt(m/K);//
+disp(T,"The period of motion ,T(seconds) = ")
+// answer is wrong in textbook
diff --git a/2381/CH1/EX1.9/ex_9.sce b/2381/CH1/EX1.9/ex_9.sce
new file mode 100755
index 000000000..31febbeda
--- /dev/null
+++ b/2381/CH1/EX1.9/ex_9.sce
@@ -0,0 +1,33 @@
+//Example 9 //foce constant,displacement , acceleration and energy
+clc;
+clear;
+close;
+//given data :
+x1=.10;// in m
+F1=4;// in N
+K=F1/x1;
+x2=0.12;// in m
+disp(K,"(a). The force constant,K(N/m) = ")
+F=-K*x2;
+disp(F,"(b). The force,F(N) = ")
+m=1.6;// in kg
+T=2*%pi*sqrt(m/K);
+disp(T,"(c). Period of pscillation,T(s) = ")
+A=x2;
+disp(A,"(d). Amplitude of motion,A(m) = ")
+alfa=A*K/m;
+disp(alfa,"(e). Maximum acceleration,alfa(m/s^2) = ")
+x=A/2;// in m
+w=sqrt(K/m);
+v=w*sqrt(A^2-x^2);
+a=w^2*x;// in m/s^2
+KE=(1/2)*m*v^2;// in J
+PE=(1/2)*K*x^2;// in J
+TE=KE+PE;
+disp(v,"(f) velocity is,(m/s) ")
+disp(a,"(f). acceleration,(m/s^2) = ")
+disp(KE,"(f) Kinetic energy is ,(J)=")
+disp(PE,"(f) Potential energy is ,(J)=")
+disp(TE,"(g). Total energy of the oscillating system,TE(J) = ")
+// in textbook part f is inculded in the part e so their is the numbeing error in parts
+
generated by cgit (git 2.34.1) at 2025-03-13 01:15:37 +0000