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 /2672/CH3/EX3.37/Ex3_37.sce | |
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 '2672/CH3/EX3.37/Ex3_37.sce')
-rwxr-xr-x | 2672/CH3/EX3.37/Ex3_37.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/2672/CH3/EX3.37/Ex3_37.sce b/2672/CH3/EX3.37/Ex3_37.sce new file mode 100755 index 000000000..17a614fcb --- /dev/null +++ b/2672/CH3/EX3.37/Ex3_37.sce @@ -0,0 +1,24 @@ +//Example 3_37
+clc;
+clear;
+close;
+format('v',5);
+//given data :
+R=10;//ohm
+L=20;//mH
+C=10;//micro F
+V=50;//V
+f0=1/2/%pi/sqrt(L/1000*C/10^6);//Hz
+disp(f0,"Resonance frequency(Hz)");
+I0=V/R;//A
+XL=2*%pi*f0*L/1000;//ohm
+VL=I0*XL;//V
+disp(VL,"Voltage across inductance(V)");
+VR=I0*R;//V
+disp(VR,"Voltage across Resistance(V)");
+XC=1/2/%pi/f0/(C*10^-6);//ohm
+VC=I0*XC;//V
+disp(VC,"Voltage across Capacitance(V)");
+Q=VL/V;//Q-factor
+disp(Q,"Q-factor");
+//Answer is not accurate in the book.
|