3769/CH13/EX13.13/Ex13_13.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

clear
//Given
f=50                     //Hz
L=2 
Ev=12                  //V
L1=6

//Calculation
//
Xl=2*%pi*f*L
Iv=Ev/Xl
Xl1=2*%pi*f*L1
Iv1=Ev/Xl1

//Result
printf("\n Current flows when the inductance is changed to 6 H %0.4f  A",Iv1)