summaryrefslogtreecommitdiff
path: root/1199/CH2
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1199/CH2
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1199/CH2')
-rwxr-xr-x1199/CH2/EX2.1/2_1.sci11
-rwxr-xr-x1199/CH2/EX2.10/2_10.sci5
-rwxr-xr-x1199/CH2/EX2.11/2_11.sci9
-rwxr-xr-x1199/CH2/EX2.12/2_12.sci10
-rwxr-xr-x1199/CH2/EX2.13/2_13.sci5
-rwxr-xr-x1199/CH2/EX2.14/2_14.sci10
-rwxr-xr-x1199/CH2/EX2.15/2_15.sci9
-rwxr-xr-x1199/CH2/EX2.16/2_16.sci5
-rwxr-xr-x1199/CH2/EX2.17/2_17.sci11
-rwxr-xr-x1199/CH2/EX2.18/2_18.sci8
-rwxr-xr-x1199/CH2/EX2.19/2_19.sci18
-rwxr-xr-x1199/CH2/EX2.2/2_2.sci13
-rwxr-xr-x1199/CH2/EX2.20/2_20.sci15
-rwxr-xr-x1199/CH2/EX2.21/2_21.sci11
-rwxr-xr-x1199/CH2/EX2.22/2_22.sci11
-rwxr-xr-x1199/CH2/EX2.23/2_23.sci9
-rwxr-xr-x1199/CH2/EX2.24/2_24.sci7
-rwxr-xr-x1199/CH2/EX2.25/2_25.sci7
-rwxr-xr-x1199/CH2/EX2.26/2_26.sci7
-rwxr-xr-x1199/CH2/EX2.27/2_27.sci15
-rwxr-xr-x1199/CH2/EX2.28/2_28.sci5
-rwxr-xr-x1199/CH2/EX2.29/2_29.sci12
-rwxr-xr-x1199/CH2/EX2.3/2_3.sci15
-rwxr-xr-x1199/CH2/EX2.30/2_30.sci6
-rwxr-xr-x1199/CH2/EX2.31/2_31.sci5
-rwxr-xr-x1199/CH2/EX2.32/2_32.sci16
-rwxr-xr-x1199/CH2/EX2.33/2_33.sci14
-rwxr-xr-x1199/CH2/EX2.34/2_34.sci15
-rwxr-xr-x1199/CH2/EX2.35/2_35.sci7
-rwxr-xr-x1199/CH2/EX2.36/2_36.sci4
-rwxr-xr-x1199/CH2/EX2.37/2_37.sci13
-rwxr-xr-x1199/CH2/EX2.38/2_38.sci18
-rwxr-xr-x1199/CH2/EX2.39/2_39.sci8
-rwxr-xr-x1199/CH2/EX2.4/2_4.sci7
-rwxr-xr-x1199/CH2/EX2.40/2_40.sci7
-rwxr-xr-x1199/CH2/EX2.41/2_41.sci8
-rwxr-xr-x1199/CH2/EX2.42/2_42.sci14
-rwxr-xr-x1199/CH2/EX2.43/2_43.sci19
-rwxr-xr-x1199/CH2/EX2.44/2_44.sci21
-rwxr-xr-x1199/CH2/EX2.47/2_47.sci10
-rwxr-xr-x1199/CH2/EX2.48/2_48.sci9
-rwxr-xr-x1199/CH2/EX2.49/2_49.sci16
-rwxr-xr-x1199/CH2/EX2.5/2_5.sci26
-rwxr-xr-x1199/CH2/EX2.50/2_50.sci22
-rwxr-xr-x1199/CH2/EX2.51/2_51.sci8
-rwxr-xr-x1199/CH2/EX2.52/2_52.sci27
-rwxr-xr-x1199/CH2/EX2.53/2_53.sci18
-rwxr-xr-x1199/CH2/EX2.54/2_54.sci8
-rwxr-xr-x1199/CH2/EX2.55/2_55.sci8
-rwxr-xr-x1199/CH2/EX2.56/2_56.sci6
-rwxr-xr-x1199/CH2/EX2.57/2_57.sci8
-rwxr-xr-x1199/CH2/EX2.6/2_6.sci9
-rwxr-xr-x1199/CH2/EX2.7/2_7.sci9
-rwxr-xr-x1199/CH2/EX2.8/2_8.sci8
-rwxr-xr-x1199/CH2/EX2.9/2_9.sci13
55 files changed, 615 insertions, 0 deletions
diff --git a/1199/CH2/EX2.1/2_1.sci b/1199/CH2/EX2.1/2_1.sci
new file mode 100755
index 000000000..f432d8b5a
--- /dev/null
+++ b/1199/CH2/EX2.1/2_1.sci
@@ -0,0 +1,11 @@
+// 2.1
+clc;
+t=0.35;
+P=1500*10^3;
+E=180*10^9;
+r=36.5;
+x=16;
+y=3;
+a=%pi*36.5*10^-3;
+da=(0.05*a*P/E)*((r/t)^0.2)*((x/y)^0.33)*((x/t)^3);
+printf("Displacement of the free end = %.2f m", da)
diff --git a/1199/CH2/EX2.10/2_10.sci b/1199/CH2/EX2.10/2_10.sci
new file mode 100755
index 000000000..e081f0e3f
--- /dev/null
+++ b/1199/CH2/EX2.10/2_10.sci
@@ -0,0 +1,5 @@
+// 2.10
+clc;
+K=[0 0.25 0.5 0.75 1];
+V=[0 -0.174 -0.454 -0.524 0];
+plot(K,V) \ No newline at end of file
diff --git a/1199/CH2/EX2.11/2_11.sci b/1199/CH2/EX2.11/2_11.sci
new file mode 100755
index 000000000..69aeff402
--- /dev/null
+++ b/1199/CH2/EX2.11/2_11.sci
@@ -0,0 +1,9 @@
+//2.11
+clc;
+RAB=125;
+Rtotal=5000;
+R2=75/125*Rtotal;
+R4=2500;
+ei=5;
+eo=[(R2/Rtotal)-(R4/Rtotal)]*ei;
+printf("Output voltage = %.1f V",eo)
diff --git a/1199/CH2/EX2.12/2_12.sci b/1199/CH2/EX2.12/2_12.sci
new file mode 100755
index 000000000..bd3732d89
--- /dev/null
+++ b/1199/CH2/EX2.12/2_12.sci
@@ -0,0 +1,10 @@
+// 2.12
+clc;
+Rm=10000;
+Rp=Rm/15;
+R=600;
+P=5;
+ei= (P*R)^0.5;
+printf("Maximum excitation voltage = %.1f V",ei)
+S=ei/360;
+printf("\nSensitivity = %.3f V/degree",S) \ No newline at end of file
diff --git a/1199/CH2/EX2.13/2_13.sci b/1199/CH2/EX2.13/2_13.sci
new file mode 100755
index 000000000..15d237d27
--- /dev/null
+++ b/1199/CH2/EX2.13/2_13.sci
@@ -0,0 +1,5 @@
+// 2.13
+clc;
+Rwga=1/400;
+Re=Rwga/5;
+printf("Resolution = %.4f mm",Re) \ No newline at end of file
diff --git a/1199/CH2/EX2.14/2_14.sci b/1199/CH2/EX2.14/2_14.sci
new file mode 100755
index 000000000..adb89dbd5
--- /dev/null
+++ b/1199/CH2/EX2.14/2_14.sci
@@ -0,0 +1,10 @@
+// 2.14
+clc;
+mo=0.8;
+sr=250;
+sm=sr/mo;
+R=sm*1*10^-3;
+printf("Resolution of 1mm movement = %.4f degree/mm",R)
+Rq=300/1000;
+printf("\nRequired Resolution of 1mm movement = %.3f degree/mm",Rq)
+disp('Since the resolution of potentiometer is higher than the resolution required so it is suitable for the application') \ No newline at end of file
diff --git a/1199/CH2/EX2.15/2_15.sci b/1199/CH2/EX2.15/2_15.sci
new file mode 100755
index 000000000..6c7aa91e9
--- /dev/null
+++ b/1199/CH2/EX2.15/2_15.sci
@@ -0,0 +1,9 @@
+// 2.15
+clc;
+Pd=(10^2)/150;
+printf("Power dissipation = %.3f W",Pd)
+th_pot=80+Pd*30;
+PDa=(10*10^-3)*(th_pot-35);
+printf("\nPower dissipation = %.3f W",PDa)
+disp('Since power dissipation is higher than the dissipation allowed so potentiometer is not suitable')
+
diff --git a/1199/CH2/EX2.16/2_16.sci b/1199/CH2/EX2.16/2_16.sci
new file mode 100755
index 000000000..8bf7d4532
--- /dev/null
+++ b/1199/CH2/EX2.16/2_16.sci
@@ -0,0 +1,5 @@
+// 2.16
+clc;
+Gf=4.2;
+v=(Gf-1)/2;
+disp(v,'Possion s ratio=')
diff --git a/1199/CH2/EX2.17/2_17.sci b/1199/CH2/EX2.17/2_17.sci
new file mode 100755
index 000000000..9261f57f2
--- /dev/null
+++ b/1199/CH2/EX2.17/2_17.sci
@@ -0,0 +1,11 @@
+// 2.17
+clc;
+strain=-5*10^-6;
+Gf=-12.1;
+R=120;
+dR_nickel=Gf*R*strain;
+printf("Change in resistance of nickel = %.3f ohm",dR_nickel)
+Gf=2;
+R=120;
+dR_nicrome=Gf*R*strain;
+printf("\nChange in resistance of nicrome = %.3f ohm",dR_nicrome) \ No newline at end of file
diff --git a/1199/CH2/EX2.18/2_18.sci b/1199/CH2/EX2.18/2_18.sci
new file mode 100755
index 000000000..f69e3e59b
--- /dev/null
+++ b/1199/CH2/EX2.18/2_18.sci
@@ -0,0 +1,8 @@
+// 2.18
+clc;
+s=100*10^6;
+E=200*10^9;
+strain=s/E;
+Gf=2;
+r_per_unit=Gf*strain*100;
+printf("Percentage change in resistance = %.1f ",r_per_unit)
diff --git a/1199/CH2/EX2.19/2_19.sci b/1199/CH2/EX2.19/2_19.sci
new file mode 100755
index 000000000..6829d3b60
--- /dev/null
+++ b/1199/CH2/EX2.19/2_19.sci
@@ -0,0 +1,18 @@
+//2.19
+clc;
+b=0.02;
+d=0.003;
+I=(b*d^3)/12;
+E=200*10^9;
+x=12.7*10^-3;
+l=0.25;
+F=3*E*I*x/l^3;
+x=0.15;
+M=F*x;
+t=0.003;
+s=(M*t)/(I*2);
+strain=s/E;
+dR=0.152;
+R=120;
+Gf=(dR/R)/strain;
+printf("Gauge factor = %.2f ",Gf) \ No newline at end of file
diff --git a/1199/CH2/EX2.2/2_2.sci b/1199/CH2/EX2.2/2_2.sci
new file mode 100755
index 000000000..24c2b9ff8
--- /dev/null
+++ b/1199/CH2/EX2.2/2_2.sci
@@ -0,0 +1,13 @@
+// 2.2
+clc;
+P=100*10^3;
+A=1500*10^-6;
+F=P*A;
+Cs=F/3;
+Ls=Cs+40;
+printf("Natural length of spring = %.2f mm", Ls)
+P1=10*10^3;
+F1=P1*A;
+Ss=3+2*.5;
+D=F1/Ss;
+printf("\nDisplacement of point C = %.2f mm", D)
diff --git a/1199/CH2/EX2.20/2_20.sci b/1199/CH2/EX2.20/2_20.sci
new file mode 100755
index 000000000..0fc62bde5
--- /dev/null
+++ b/1199/CH2/EX2.20/2_20.sci
@@ -0,0 +1,15 @@
+// 2.20
+clc;
+dR=0.013;
+R=240;
+l=0.1;
+Gf=2.2;
+dl=(dR/R)*l/Gf*10^6;
+printf(" Change in length= %.1f um ",dl)
+
+strain=dl*10^-6/l;
+E=207*10^9;
+s=E*strain;
+A=4*10^-4;
+F=s*A;
+printf("\n Force= %.2f N ",F) \ No newline at end of file
diff --git a/1199/CH2/EX2.21/2_21.sci b/1199/CH2/EX2.21/2_21.sci
new file mode 100755
index 000000000..e9ca7ee10
--- /dev/null
+++ b/1199/CH2/EX2.21/2_21.sci
@@ -0,0 +1,11 @@
+// 2.21
+clc;
+th1=30;
+th2=60;
+th0=th1+th2/2;
+Rth1=4.8;
+Rth2=6.2;
+Rth0=5.5;
+ath0=(1/Rth0)*(Rth2-Rth1)/(th2-th1);
+printf("\n alpha at o degree= %.4f /degree C ",ath0)
+disp('5.5[1+0.0085(th-45)]') \ No newline at end of file
diff --git a/1199/CH2/EX2.22/2_22.sci b/1199/CH2/EX2.22/2_22.sci
new file mode 100755
index 000000000..abd18dab6
--- /dev/null
+++ b/1199/CH2/EX2.22/2_22.sci
@@ -0,0 +1,11 @@
+// 2.22
+clc;
+th1=100;
+th2=130;
+th0=th1+th2/2;
+Rth1=573.40;
+Rth2=605.52;
+Rth0=589.48;
+ath0=(1/Rth0)*(Rth2-Rth1)/(th2-th1);
+printf("alpha at o degree= %.5f /degree C ",ath0)
+disp('Linear approximation is: Rth= 589.48[1+0.00182(th-115)]') \ No newline at end of file
diff --git a/1199/CH2/EX2.23/2_23.sci b/1199/CH2/EX2.23/2_23.sci
new file mode 100755
index 000000000..7d213e958
--- /dev/null
+++ b/1199/CH2/EX2.23/2_23.sci
@@ -0,0 +1,9 @@
+// 2.23
+clc;
+Rth0=100;
+ath0=0.00392;
+dth=65-25;
+R65=Rth0*[1+ath0*dth];
+printf("resistance at 65 degree C= %.2f ohm ",R65)
+th={[(150/100)-1]/ath0}+25;
+printf("\n Temperature = %.2f degree C ",th) \ No newline at end of file
diff --git a/1199/CH2/EX2.24/2_24.sci b/1199/CH2/EX2.24/2_24.sci
new file mode 100755
index 000000000..3ec202a3b
--- /dev/null
+++ b/1199/CH2/EX2.24/2_24.sci
@@ -0,0 +1,7 @@
+// 2.24
+clc;
+Rth0=10;
+ath0=0.00393;
+dth=150-20;
+R150=Rth0*[1+ath0*dth];
+printf("Resistance at 150 degree C=%.2f ohm",R150) \ No newline at end of file
diff --git a/1199/CH2/EX2.25/2_25.sci b/1199/CH2/EX2.25/2_25.sci
new file mode 100755
index 000000000..c6b32af17
--- /dev/null
+++ b/1199/CH2/EX2.25/2_25.sci
@@ -0,0 +1,7 @@
+// Calculate the time
+clc;
+th=30;
+th0=50;
+tc=120;
+t=-120*[log(1-(th/th0))];
+printf("Time= %.2f s ",t) \ No newline at end of file
diff --git a/1199/CH2/EX2.26/2_26.sci b/1199/CH2/EX2.26/2_26.sci
new file mode 100755
index 000000000..b567dd842
--- /dev/null
+++ b/1199/CH2/EX2.26/2_26.sci
@@ -0,0 +1,7 @@
+//2.26
+clc;
+R25=100;
+ath=-0.05;
+dth=35-25;
+R35=R25*[1+ath*dth];
+printf("Resistance at 35 degree C= %.2f ohm ",R35) \ No newline at end of file
diff --git a/1199/CH2/EX2.27/2_27.sci b/1199/CH2/EX2.27/2_27.sci
new file mode 100755
index 000000000..ab6822be6
--- /dev/null
+++ b/1199/CH2/EX2.27/2_27.sci
@@ -0,0 +1,15 @@
+// 2.27
+clc;
+Ro=3980;
+Ta=273;
+//3980= a*3980*exp(b/273)
+Rt50=794;
+Ta50=273+50;
+//794= a*3980*exp(b/323)
+//on solving
+//a=30*10^-6, b=2843
+Ta40=273+40;
+Rt40=(30*10^-6)*3980*exp(2843/313);
+printf("Resistance at 40 degree C= %.2f ohm ",Rt40)
+Rt100=(30*10^-6)*3980*exp(2843/373);
+printf("\nResistance at 100 degree C= %.2f ohm ",Rt100) \ No newline at end of file
diff --git a/1199/CH2/EX2.28/2_28.sci b/1199/CH2/EX2.28/2_28.sci
new file mode 100755
index 000000000..7c59e09ac
--- /dev/null
+++ b/1199/CH2/EX2.28/2_28.sci
@@ -0,0 +1,5 @@
+// 2.28
+clc;
+th=((1-1800/2000)/0.05)+70;
+dth=th-70;
+printf("Change in temperature= %.1f degree C ",dth) \ No newline at end of file
diff --git a/1199/CH2/EX2.29/2_29.sci b/1199/CH2/EX2.29/2_29.sci
new file mode 100755
index 000000000..9a91b1955
--- /dev/null
+++ b/1199/CH2/EX2.29/2_29.sci
@@ -0,0 +1,12 @@
+// 2.29
+clc;
+C=500*10^-12;
+R20=10000*(1-0.05*(20-25));
+f20=1/(2*%pi*R20*C);
+printf("Frequency of oscillation at 20 degree C = %.2f Hz ",f20)
+R25=10000*(1-0.05*(25-25));
+f25=1/(2*%pi*R25*C);
+printf("\nFrequency of oscillation at 25 degree C = %.2f Hz ",f25)
+R30=10000*(1-0.05*(30-25));
+f30=1/(2*%pi*R30*C);
+printf("\nFrequency of oscillation at 30 degree C = %.2f Hz ",f30) \ No newline at end of file
diff --git a/1199/CH2/EX2.3/2_3.sci b/1199/CH2/EX2.3/2_3.sci
new file mode 100755
index 000000000..b87e63f83
--- /dev/null
+++ b/1199/CH2/EX2.3/2_3.sci
@@ -0,0 +1,15 @@
+// 2.3
+clc;
+D=15*10^-3;
+P=300*10^3;
+sm=300*10^6;
+t=[3*D^2*P/(16*sm)]^0.5*10^3;
+printf("Thickness = %.2f mm",t)
+P=150*10^3;
+v=0.28;
+E=200*10^9;
+dm=3*(1-v^2)*D^4*P/(256*E*t^3);
+printf("\nDeflection at center for Pressure of 150 kN/m2= %.4f mm",dm)
+d=8900;
+wn=(20*t*10^-3/D^2)*(E/(3*d*(1-v^2)))^0.5;
+printf("\nNatural frequency of the diaphragm =%.0f rad/sec",wn)
diff --git a/1199/CH2/EX2.30/2_30.sci b/1199/CH2/EX2.30/2_30.sci
new file mode 100755
index 000000000..6560a24b4
--- /dev/null
+++ b/1199/CH2/EX2.30/2_30.sci
@@ -0,0 +1,6 @@
+// 2.30
+clc;
+Se_thermocouple=500-(-72);
+printf("Sensitivity of thermocouple= %.1f micro V/degree C",Se_thermocouple)
+Vo=Se_thermocouple*100*10^-6;
+printf("\nMaximum output voltage= %.2f V ",Vo) \ No newline at end of file
diff --git a/1199/CH2/EX2.31/2_31.sci b/1199/CH2/EX2.31/2_31.sci
new file mode 100755
index 000000000..695038fab
--- /dev/null
+++ b/1199/CH2/EX2.31/2_31.sci
@@ -0,0 +1,5 @@
+// 2.31
+clc;
+ET=27.07+0.8;
+printf("Required e.m.f.= %.2f mV ",ET)
+disp('Temperature corresponding to 27.87 mV is 620 degree C') \ No newline at end of file
diff --git a/1199/CH2/EX2.32/2_32.sci b/1199/CH2/EX2.32/2_32.sci
new file mode 100755
index 000000000..41bdac006
--- /dev/null
+++ b/1199/CH2/EX2.32/2_32.sci
@@ -0,0 +1,16 @@
+// 2.32
+clc;
+Rm=50;
+Re=12;
+E=33.3*10^-3;
+i=0.1*10^-3;
+Rs=(E/i)-Rm-Re;
+printf("Series resistance=%.2f ohm",Rs)
+Re=13;
+i1=E/(Rs+Re+Rm);
+AE=[(i1-i)/i]*800;
+printf("\nApproximate error due to rise in resistance of 1 ohm in Re=%.2f degree C",AE)
+R_change=50*0.00426*10;
+i1=E/(Rs+Re+Rm+R_change);
+AE=[(i1-i)/i]*800;
+printf("\nApproximate error due to rise in Temp. of 10=%.2f degree C",AE)
diff --git a/1199/CH2/EX2.33/2_33.sci b/1199/CH2/EX2.33/2_33.sci
new file mode 100755
index 000000000..11f8b5efe
--- /dev/null
+++ b/1199/CH2/EX2.33/2_33.sci
@@ -0,0 +1,14 @@
+// 2.33
+clc;
+E_20=0.112*10^-3;// emf at 20degree C
+E_900=8.446*10^-3;
+E_1200=11.946*10^-3;
+E1=E_900-E_20;
+E2=E_1200-E_20;
+//E1=1.08*R1/(R1+2.5+R2 (i)
+//E2=1.08*(R1+2.5)/(R1+2.5+R2 (ii)
+//on solving (i) and (ii)
+R1=5.95;
+R2=762.6;
+printf("Value of resistance R1=%.2f ohm",R1)
+printf("\nValue of resistance R2=%.2f ohm",R2)
diff --git a/1199/CH2/EX2.34/2_34.sci b/1199/CH2/EX2.34/2_34.sci
new file mode 100755
index 000000000..73247141e
--- /dev/null
+++ b/1199/CH2/EX2.34/2_34.sci
@@ -0,0 +1,15 @@
+// 2.34
+clc;
+th=20;
+Vz=2.73+th*10*10^-3;
+Voffset=-2.73;
+Vout=Vz+Voffset;
+Rbias=(5-0.2)/10^-3;
+Rzero=500;
+th=50;
+Vz=2.73+th*10*10^-3;
+VmaxT=Vz+Voffset;
+Vsupply=5;
+Rl=(VmaxT*Rbias)/(Vsupply-VmaxT);
+printf("Value of resistance R1=%.2f ohm",R1)
+disp('value of resistance RL>>Rl') \ No newline at end of file
diff --git a/1199/CH2/EX2.35/2_35.sci b/1199/CH2/EX2.35/2_35.sci
new file mode 100755
index 000000000..c123ec1a1
--- /dev/null
+++ b/1199/CH2/EX2.35/2_35.sci
@@ -0,0 +1,7 @@
+// 2.35
+clc;
+L1=2;
+La=1-0.02;
+Lnew=2/La;
+dl=Lnew-L1;
+printf("Change in inductance=%.2f mH",dl)
diff --git a/1199/CH2/EX2.36/2_36.sci b/1199/CH2/EX2.36/2_36.sci
new file mode 100755
index 000000000..b61c5eff9
--- /dev/null
+++ b/1199/CH2/EX2.36/2_36.sci
@@ -0,0 +1,4 @@
+// 2.36
+clc;
+linearity_percentage=(0.003/1.5)*100;
+printf("percentage linearity=%.2f ",linearity_percentage)
diff --git a/1199/CH2/EX2.37/2_37.sci b/1199/CH2/EX2.37/2_37.sci
new file mode 100755
index 000000000..e5a492625
--- /dev/null
+++ b/1199/CH2/EX2.37/2_37.sci
@@ -0,0 +1,13 @@
+// 2.37
+clc;
+displacement=0.5;
+Vo=2*10^-3;
+Se_LVDT=Vo/displacement;
+printf("senstivity of the LVDT=%.3f V/mm",Se_LVDT)
+Af=250;
+Se_instrument=Se_LVDT*Af;
+printf("\nSenstivity of the instrument=%.1f V/mm",Se_instrument)
+sd=5/100;
+Vo_min=50/5;
+Re_instrument=1*1/1000;
+printf("\nresolution of instrument=%.3f mm",Re_instrument)
diff --git a/1199/CH2/EX2.38/2_38.sci b/1199/CH2/EX2.38/2_38.sci
new file mode 100755
index 000000000..c27ae6688
--- /dev/null
+++ b/1199/CH2/EX2.38/2_38.sci
@@ -0,0 +1,18 @@
+// 2.38
+clc;
+b=0.02;
+t=0.004;
+I=(1/12)*b*t^3;
+F=25;
+l=0.25;
+E=200*10^9;
+x=(F*l^3)/(3*E*I);
+printf("deflection=%.2f m",x)
+DpF=x/F;
+Se=DpF*0.5*1000;
+Re=(10/1000)*(2/10);
+F_min=Re/Se;
+F_max=10/Se;
+printf("\nminimum force=%.2f N",F_min)
+printf("\nmaximum force=%.2f N",F_max)
+
diff --git a/1199/CH2/EX2.39/2_39.sci b/1199/CH2/EX2.39/2_39.sci
new file mode 100755
index 000000000..5ac47d4a3
--- /dev/null
+++ b/1199/CH2/EX2.39/2_39.sci
@@ -0,0 +1,8 @@
+// 2.39
+clc;
+disp('permittivity of the air e0=8.85*10^-12')
+e0=8.85*10^-12;
+w=25*10^-3;
+d=0.25*10^-3;
+Se=-4*e0*w/d;
+printf("sensitivity of the transducer=%.2f F/m",Se)
diff --git a/1199/CH2/EX2.4/2_4.sci b/1199/CH2/EX2.4/2_4.sci
new file mode 100755
index 000000000..5377287f2
--- /dev/null
+++ b/1199/CH2/EX2.4/2_4.sci
@@ -0,0 +1,7 @@
+// 2.4
+clc;
+T=100;
+G=80*10^9;
+d=2*15*10^-3;
+th=16*T/(%pi*G*d^3)
+printf("Angle of twist= %.6f rad",th) \ No newline at end of file
diff --git a/1199/CH2/EX2.40/2_40.sci b/1199/CH2/EX2.40/2_40.sci
new file mode 100755
index 000000000..10441e99b
--- /dev/null
+++ b/1199/CH2/EX2.40/2_40.sci
@@ -0,0 +1,7 @@
+// 2.40
+clc;
+C1=370*10^-12;
+d1=3.5*10^-3;
+d2=2.9*10^-3;
+C2=C1*d1*10^12/d2;
+printf("the value of the capacitance afte the application of pressure=%.2f pF",C2)
diff --git a/1199/CH2/EX2.41/2_41.sci b/1199/CH2/EX2.41/2_41.sci
new file mode 100755
index 000000000..7182dcf4c
--- /dev/null
+++ b/1199/CH2/EX2.41/2_41.sci
@@ -0,0 +1,8 @@
+// 2.41
+clc;
+fo1=100*10^3;
+d1=4;
+d2=3.7;
+fo2=[(d2/d1)^0.5]*fo1;
+dfo=fo1-fo2/10^-3;
+printf("change in frequency of the oscillator=%.1f kHz",dfo)
diff --git a/1199/CH2/EX2.42/2_42.sci b/1199/CH2/EX2.42/2_42.sci
new file mode 100755
index 000000000..c63bcf28e
--- /dev/null
+++ b/1199/CH2/EX2.42/2_42.sci
@@ -0,0 +1,14 @@
+// 2.42
+clc;
+L_air=(3.1-3)/2;
+D_stress=100/L_air;
+e0=8.85*10^-12;
+l=20*10^-3;
+D2=3.1;
+D1=3;
+C=(2*%pi)*e0*l*10^12/(log(D2/D1));
+printf("Capacitance=%.1f pF",C)
+l=(20*10^-3)-(2*10^-3);
+C_new=(2*%pi)*e0*l/(log(D2/D1));
+C_change=C-C_new*10^12;
+printf("\nchange in Capacitance=%.1f pF",C_change)
diff --git a/1199/CH2/EX2.43/2_43.sci b/1199/CH2/EX2.43/2_43.sci
new file mode 100755
index 000000000..a4581abab
--- /dev/null
+++ b/1199/CH2/EX2.43/2_43.sci
@@ -0,0 +1,19 @@
+//2.43
+clc;
+M=0.95;
+w=2*%pi*20;
+tc=(1/w)*[(M^2)/(1-M^2)]^0.5;
+printf("Time constant=%.2f s",tc)
+ph={(%pi/2)-[atan(w*tc)]}*(180/%pi);
+printf("\nPhase shift=%.1f deg",ph)
+C=(8.85*10^-12*300*10^-6)/(0.125*10^-3);
+R=tc*10^-6/C;
+printf("\nSeries resistance=%.0f Mohm",R)
+M=1/(1+(1/(2*%pi*5*tc)^2))^0.5;
+printf("\nAmplitude ratio=%.1f ",M)
+Eb=100;
+x=0.125*10^-3;
+Vs=Eb/x;
+printf("\nVoltage sensitivity=%.1f V/m",Vs)
+
+
diff --git a/1199/CH2/EX2.44/2_44.sci b/1199/CH2/EX2.44/2_44.sci
new file mode 100755
index 000000000..bd6f25ad9
--- /dev/null
+++ b/1199/CH2/EX2.44/2_44.sci
@@ -0,0 +1,21 @@
+//2.44
+clc;
+e0=8.85*10^-12;
+A=500*10^-6;
+d=0.2*10^-3;
+C=e0*A/d;
+d1=0.18*10^-3;
+C_new=e0*A/d1;
+C_change=C_new-C;
+Ratio=(C_change/C)/(0.02/0.2);
+printf("\nratio of per unit change of capacitance to per unit change of diaplacement=%.2f",Ratio)
+d1=0.19*10^-3;
+e1=1;
+d2=0.01*10^-3;
+e2=8;
+C=(e0*A)/((d1/e1)+(d2/e2));
+d1_new=0.17*10^-3;
+C_new=(e0*A)/((d1_new/e1)+(d2/e2));
+C_change=C_new-C;
+Ratio=(C_change/C)/(0.02/0.2);
+printf("\n New ratio of per unit change of capacitance to per unit change of diaplacement=%.2f",Ratio)
diff --git a/1199/CH2/EX2.47/2_47.sci b/1199/CH2/EX2.47/2_47.sci
new file mode 100755
index 000000000..dcae61dd6
--- /dev/null
+++ b/1199/CH2/EX2.47/2_47.sci
@@ -0,0 +1,10 @@
+// 2.47
+clc;
+g=0.055;
+t=2*10^-3;
+P=1.5*10^6;
+Eo=g*t*P;
+printf("Output voltage=%.0f V",Eo)
+e=40.6*10^-12;
+d=e*g*10^12;
+printf("\n Charge sensitivity=%.2f pC/N",d)
diff --git a/1199/CH2/EX2.48/2_48.sci b/1199/CH2/EX2.48/2_48.sci
new file mode 100755
index 000000000..42c82ec39
--- /dev/null
+++ b/1199/CH2/EX2.48/2_48.sci
@@ -0,0 +1,9 @@
+// 2.48
+clc;
+g=0.055;
+t=1.5*10^-3;
+Eo=100;
+P= Eo/(g*t);
+A=25*10^-6;
+F=P*A;
+printf("\n Force=%.0f N",F)
diff --git a/1199/CH2/EX2.49/2_49.sci b/1199/CH2/EX2.49/2_49.sci
new file mode 100755
index 000000000..2ea012143
--- /dev/null
+++ b/1199/CH2/EX2.49/2_49.sci
@@ -0,0 +1,16 @@
+// 2.49
+clc;
+A=25*10^-6;
+F=5;
+P=F/A;
+d=150*10^-12;
+e=12.5*10^-9;
+g=d/(e);
+t=1.25*10^-3;
+Eo=(g*t*P);
+strain=P/(12*10^6);
+Q=d*F*10^12;
+C=Q/Eo;
+printf("\n strain=%.4f ",strain)
+printf("\n Charge=%.0f pC",Q)
+printf("\n capacitance=%.0f pF",C)
diff --git a/1199/CH2/EX2.5/2_5.sci b/1199/CH2/EX2.5/2_5.sci
new file mode 100755
index 000000000..167423672
--- /dev/null
+++ b/1199/CH2/EX2.5/2_5.sci
@@ -0,0 +1,26 @@
+// 2.5
+clc;
+d=60*10^-3;
+Q=80*10^-3;
+A=(%pi/4)*d^2;
+v=Q/A;
+vi=10^-3;
+de=10^3;
+Re=v*de*d/vi;
+printf("Reynoids number = %.2f mm",Re)
+d2=60*10^-3;
+d1=100*10^-3;
+A2=(%pi/4)*d2^2;
+M=1/[(1-(d2/d1)^2)^0.5];
+Cd=0.99;
+w=1*10^3;
+Qact=80*10^-3;
+Pd=[[Qact/(Cd*M*A2)]^2]*w/(2)*10^-3;
+printf("\nDifferential pressure = %.0f kN/m2 ",Pd)
+Po=0.28;
+D=10*10^-3;
+E=206*10^9;
+t=0.2*10^-3;
+dm=[3*(1-Po^2)*D^4*Pd]/(256*E*t^3);
+def=dm*10^6;
+printf("\nDeflection at the center of diaphragm = %.2f micro m",def) \ No newline at end of file
diff --git a/1199/CH2/EX2.50/2_50.sci b/1199/CH2/EX2.50/2_50.sci
new file mode 100755
index 000000000..b3561b6fd
--- /dev/null
+++ b/1199/CH2/EX2.50/2_50.sci
@@ -0,0 +1,22 @@
+// 2.50
+clc;
+d=2*10^-12;
+t=1*10^-3;
+Fmax=0.01;
+e0=8.85*10^-12;
+er=5;
+A=100*10^-6;
+Eo_peak_to_peak=2*d*t*Fmax*10^3/(e0*er*A);
+printf("\n peak voltage swing under open conditions=%.2f mV",Eo_peak_to_peak)
+Rl=100*10^6;
+Cl=20*10^-12;
+d1=1*10^-3;
+Cp=e0*er*A/d1;
+C=Cp+Cl;
+w=1000;
+m=[w*Cp*Rl/[1+(w*C*Rl)^2]^0.5];
+El_peak_to_peak=[2*d*t*Fmax*10^3/(e0*er*A)]*m;
+printf("\n peak voltage swing under loaded conditions=%.2f mV",El_peak_to_peak)
+E=90*10^9;
+dt=2*Fmax*t*10^12/(A*E);
+printf("\n Maximum change in crystal thickness=%.2f pm",dt) \ No newline at end of file
diff --git a/1199/CH2/EX2.51/2_51.sci b/1199/CH2/EX2.51/2_51.sci
new file mode 100755
index 000000000..6568340ff
--- /dev/null
+++ b/1199/CH2/EX2.51/2_51.sci
@@ -0,0 +1,8 @@
+// 2.51
+clc;
+M=0.95;
+tc=1.5*10^-3;
+w=(1/tc)*[(M^2)/(1-M^2)]^0.5;
+printf("\n Minimum frequency=%.2f rad/sec",w)
+ph={(%pi/2)-[atan(w*tc)]}*(180/%pi);
+printf("\n Phase shift=%.2f deg",ph)
diff --git a/1199/CH2/EX2.52/2_52.sci b/1199/CH2/EX2.52/2_52.sci
new file mode 100755
index 000000000..27ee1b2fe
--- /dev/null
+++ b/1199/CH2/EX2.52/2_52.sci
@@ -0,0 +1,27 @@
+//2.52
+clc;
+Kq=40*10^-3;
+Cp=1000*10^-12;
+K=Kq/Cp;
+printf(" Sensitivity of the transducer=%.2f V/m",K)
+Cc=300*10^-12;
+Ca=50*10^-12;
+C=Cp+Cc+Ca;
+Hf=Kq/C;
+printf("\n High frequency sensitivity =%.2f V/m",Hf)
+R=1*10^6;
+tc=R*C;
+M=0.95;
+w=(1/tc)*[(M^2)/(1-M^2)]^0.5;
+f=w/(2*%pi);
+printf("\n Minimum frequency=%.2f sec",f)
+disp('now f=10Hz')
+f=10;
+w=2*%pi*f;
+tc=(1/w)*[(M^2)/(1-M^2)]^0.5;
+C_new=tc/R;
+Ce=(C_new-C)*10^6;
+printf("\n External shunt capacitance=%.2f pF",Ce)
+Hf_new=Kq/C_new;
+printf("\n new value of high frequency sensitivity=%.2f V/m",Hf_new)
+
diff --git a/1199/CH2/EX2.53/2_53.sci b/1199/CH2/EX2.53/2_53.sci
new file mode 100755
index 000000000..7ac4db43e
--- /dev/null
+++ b/1199/CH2/EX2.53/2_53.sci
@@ -0,0 +1,18 @@
+// 2.53
+clc;
+R=10^6;
+C=2500*10^-12;
+tc=R*C;
+t=2*10^-3;
+d=100*10^-12;
+F=0.1;
+el=10^3*{d*F*[exp(-t/tc)]/C};
+printf("Voltage just before t=2ms =%.2f mV",e1)
+el_after=10^3*{d*F*[exp(-t/tc)-1]/C};
+disp(el_after,'voltage just after t=2ms (mV)')
+printf("Voltage just after t=2ms =%.2f mV",el_after)
+disp('when t=10ms')
+t=10*10^-3;
+T=2*10
+e_10=10^3*{d*F*[exp((-T/tc)-1)]*{exp(-(t-T))/tc}/C}
+printf("output voltage 10 ms after the application of impulse =%.0f mV",e_10)
diff --git a/1199/CH2/EX2.54/2_54.sci b/1199/CH2/EX2.54/2_54.sci
new file mode 100755
index 000000000..cedd56392
--- /dev/null
+++ b/1199/CH2/EX2.54/2_54.sci
@@ -0,0 +1,8 @@
+// 2.54
+clc;
+disp('Let T=1');
+T=1;
+el=0.95;
+tc=-T/log(el);
+printf("Time constant =%.2f s",tc)
+disp('as T=1 so time constant should be approximately equal to 20T') \ No newline at end of file
diff --git a/1199/CH2/EX2.55/2_55.sci b/1199/CH2/EX2.55/2_55.sci
new file mode 100755
index 000000000..8aac62cc9
--- /dev/null
+++ b/1199/CH2/EX2.55/2_55.sci
@@ -0,0 +1,8 @@
+//2.55
+clc;
+Kh=-1*10^-6;
+I=3;
+B=0.5;
+t=2*10^-3;
+Eh=Kh*I*B*10^3/t;
+printf("output voltage =%.2f mV",Eh)
diff --git a/1199/CH2/EX2.56/2_56.sci b/1199/CH2/EX2.56/2_56.sci
new file mode 100755
index 000000000..323ed3f5b
--- /dev/null
+++ b/1199/CH2/EX2.56/2_56.sci
@@ -0,0 +1,6 @@
+//2.56
+clc;
+R1=(30/10*10^-3)-1000;
+printf("External resistance required =%.3f ohm",R1)
+Id=30*10^3/((2*10^3)+(100*10^3))
+printf("\nDark current =%.2f mA",Id)
diff --git a/1199/CH2/EX2.57/2_57.sci b/1199/CH2/EX2.57/2_57.sci
new file mode 100755
index 000000000..071c0a642
--- /dev/null
+++ b/1199/CH2/EX2.57/2_57.sci
@@ -0,0 +1,8 @@
+//2.57
+clc;
+Vb=10-(10/((2*10^3))*10^3);
+disp(Vb,'Potential of point b, Vb=')
+Vd=10-(10/((3*10^3))*2*10^3);
+disp(Vd,'Potential of point d, Vd=')
+Ebd=Vb-Vd;
+printf("\nOutout voltage of bridge =%.2f V",Ebd)
diff --git a/1199/CH2/EX2.6/2_6.sci b/1199/CH2/EX2.6/2_6.sci
new file mode 100755
index 000000000..f4df75821
--- /dev/null
+++ b/1199/CH2/EX2.6/2_6.sci
@@ -0,0 +1,9 @@
+// 2.6
+clc;
+Pd=10*10^3;
+d=1000;
+VmeanW= (2*Pd/d)^0.5;
+printf("Mean velocity of water = %.2f m/s",VmeanW)
+d=0.65;
+Va= (2*Pd/d)^0.5;
+printf("\nVelocity of air= %.1f m/s",Va) \ No newline at end of file
diff --git a/1199/CH2/EX2.7/2_7.sci b/1199/CH2/EX2.7/2_7.sci
new file mode 100755
index 000000000..018df4918
--- /dev/null
+++ b/1199/CH2/EX2.7/2_7.sci
@@ -0,0 +1,9 @@
+// 2.7
+disp('let coefficient of discharge Cd=1')
+H1=0.9;
+L=1.2;
+g=9.81;
+Q=(2/3)*L*(2*g)^0.5*(H1)^(1.5);
+th=45;
+H2={Q*(15/8)/[(2*g)^0.5*tan(th)]}^(-1/2.5);
+printf("Depth of flow = %.1f m",H2) \ No newline at end of file
diff --git a/1199/CH2/EX2.8/2_8.sci b/1199/CH2/EX2.8/2_8.sci
new file mode 100755
index 000000000..b79569b1c
--- /dev/null
+++ b/1199/CH2/EX2.8/2_8.sci
@@ -0,0 +1,8 @@
+// 2.8
+Cd=0.6;
+H=0.5;
+dH=0.01;
+g=9.81;
+Q=(8/15)*Cd*(2*g)^0.5*(H)^(2.5);
+dQ=(2.5*dH/H)*Q;
+printf("Uncertinity in discharge = %.4f m3/s",dQ)
diff --git a/1199/CH2/EX2.9/2_9.sci b/1199/CH2/EX2.9/2_9.sci
new file mode 100755
index 000000000..c0d769046
--- /dev/null
+++ b/1199/CH2/EX2.9/2_9.sci
@@ -0,0 +1,13 @@
+// 2.9
+clc;
+Rnormal=10000/2;
+Rpl=10000/50;
+Rc1=Rnormal-3850;
+Dnormal=Rc1/Rpl;
+printf("Displacement = %.2f mm",Dnormal)
+Rc2=Rnormal-7560;
+Dnormal=Rc2/Rpl;
+printf("\nDisplacement = %.2f mm",Dnormal)
+disp('One displacement is positive and other is negative so two displacements are in the opposite direction')
+Re=10*1/200;
+printf("\nResolution = %.2f mm",Re)