diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /833/CH17 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '833/CH17')
| -rwxr-xr-x | 833/CH17/EX17.1/Ex17_1.sce | 20 | ||||
| -rwxr-xr-x | 833/CH17/EX17.1/Ex17_1.txt | 20 | ||||
| -rwxr-xr-x | 833/CH17/EX17.1/Result17_1.txt | 8 |
3 files changed, 48 insertions, 0 deletions
diff --git a/833/CH17/EX17.1/Ex17_1.sce b/833/CH17/EX17.1/Ex17_1.sce new file mode 100755 index 000000000..722bf29e2 --- /dev/null +++ b/833/CH17/EX17.1/Ex17_1.sce @@ -0,0 +1,20 @@ +//Caption:Find (a)Speed (b)Power factor of motor
+//Exa:17.1
+clc;
+clear;
+close;
+r=25//Resistance of motor(in ohms)
+P=2//Number of poles
+l=0.4//Inductance of motor(in henry)
+n=1800//Speed of motor(in r.p.m)
+V=230//Voltage supplied(in volts)
+Il=1//Load current(in A)
+f=50//Frequency(in hertz)
+fr=(P*n)/120
+Eb=V-(r*Il)
+Er=Eb/fr
+fac=(sqrt((V^2)-((Il*2*(%pi)*f*l)^2))-(Il*r))/Er
+n=fac*(120/P)
+disp(n,'(a)Speed(in rpm)=')
+pf=sqrt((V^2)-((Il*2*(%pi)*f*l)^2))/V
+disp(pf,'(b)Power factor=')
\ No newline at end of file diff --git a/833/CH17/EX17.1/Ex17_1.txt b/833/CH17/EX17.1/Ex17_1.txt new file mode 100755 index 000000000..722bf29e2 --- /dev/null +++ b/833/CH17/EX17.1/Ex17_1.txt @@ -0,0 +1,20 @@ +//Caption:Find (a)Speed (b)Power factor of motor
+//Exa:17.1
+clc;
+clear;
+close;
+r=25//Resistance of motor(in ohms)
+P=2//Number of poles
+l=0.4//Inductance of motor(in henry)
+n=1800//Speed of motor(in r.p.m)
+V=230//Voltage supplied(in volts)
+Il=1//Load current(in A)
+f=50//Frequency(in hertz)
+fr=(P*n)/120
+Eb=V-(r*Il)
+Er=Eb/fr
+fac=(sqrt((V^2)-((Il*2*(%pi)*f*l)^2))-(Il*r))/Er
+n=fac*(120/P)
+disp(n,'(a)Speed(in rpm)=')
+pf=sqrt((V^2)-((Il*2*(%pi)*f*l)^2))/V
+disp(pf,'(b)Power factor=')
\ No newline at end of file diff --git a/833/CH17/EX17.1/Result17_1.txt b/833/CH17/EX17.1/Result17_1.txt new file mode 100755 index 000000000..a12d4c212 --- /dev/null +++ b/833/CH17/EX17.1/Result17_1.txt @@ -0,0 +1,8 @@ +(a)Speed(in rpm)=
+
+ 1471.926
+
+ (b)Power factor=
+
+ 0.8375479
+
\ No newline at end of file |