summaryrefslogtreecommitdiff
path: root/620/CH24/EX24.5/example24_5.sce
blob: 2663ac02aed742053d8f6b0e81df6ededbdf56bd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
disp("Part a");
c=0.1*10^(-6);
i=5*10^(-3);
v=10;
f=1000;
x_c=1/(2*%pi*f*c);
z=v/i;
r=sqrt(z^2-x_c^2);
disp("the resistance (in kΩ) required is"); disp(r*10^(-3));
disp("Part b");
deg=-atan(x_c/r)*180/%pi;
disp("the phase angle (in deg) between applied voltage and current is"); disp(deg);