summaryrefslogtreecommitdiff
path: root/995/CH4/EX4.12/Ex4_12.sce
blob: ac0328b1c9c2bfd12a4a05e2877aa158cc46c66b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Ex:4.12
clc;
clear;
close;
L=150*10^-3;
f=400;
V=115;
X_L=(2*%pi*f*L);
r=250;
z=sqrt(r^2+X_L^2);
I_s=V/z;
printf("Reactance = %f ohm",X_L);
printf("\n Current = %f A",I_s)