3769/CH12/EX12.16/Ex12_16.sce


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

clear
//Given
N=4000
l=0.6                              //m
r=16*10**-4                        //m

//Calculation
u=4*%pi*10**-7
L=(u*N**2*((%pi*r)/4.0))/l
Liron=N*L

//Result
printf("\n Inductance of the solenoid is %0.0f  H",Liron)