summaryrefslogtreecommitdiff
path: root/3673/CH8/EX8.9/Ex8_9.sce
blob: 6e394be01d5783fd91ed0579ee3e7c1260f2c80d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 8_9 page no:319
clc;
R=50;
Xl=25;
V=200;
f=50;
Imax=V/Xl;
Imin=V/(sqrt(R^2+Xl^2));
Pmax=V^2/(2*Xl);
disp(Imax,"the maximum value of current is (in A)");
disp(Imin,"the minimum value of current is (in A)");
disp(Pmax,"the maximum power is (in watts)");
//In text book calculation in Imin is wrong