summaryrefslogtreecommitdiff
path: root/3836/CH14/EX14.4/Ex14_4.sce
blob: 542040a94a87c19dad2578080589ce9aef512c29 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clear
//
//Initialization
n=400                        //turns
l=200*10**-3                 //circumference
uo=4*%pi*10**-7          //epsilon zero constant
a=30*10**-6                 //area

//Calculation
L=(uo*a*n**2)/l                //Inductance in henry               

//Results
printf("\n Inductance,L = %d uH",L*10**6)