summaryrefslogtreecommitdiff
path: root/3830/CH1/EX1.35/Ex1_35.sce
blob: 9929fc7ecdd8327071c96ab8fe7c156a375c0ec2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
// Exa 1.35

clc;
clear;

// Given

f = 450; // Resonating frequency in kHz
C = 250; // Capacitor value at resonating frequency (pf)
Q = 105; // Q-meter reading at resonance
Rsh = 0.75; // Value of shunt resistance in ohms

// Solution

L = 1/((2*%pi*f*10^3)^2*C*10^-12);  // in H
w=2*%pi*f*10^3;
R = (w*L)/Q - Rsh;
x= round(w*L/Q);
printf(' The value of resistance,R = %.2f Ohms \n',double(w*L/Q)-Rsh);

// The answer vary due to round off error