summaryrefslogtreecommitdiff
path: root/3769/CH8/EX8.7/Ex8_7.sce
blob: 6047092786062a41216bc266b71eea74a4f869fd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clear
//Given
I=5               //A
l=0.01              //m
a=45              //degree
r=2               //m
u=10**-7

//Calculation
//
B=(u*I*l*sin(a)*180/3.14)/r**2

//Result
printf("\n Magnetic field is %0.1f *10**-10 T",B*10**8)