1784/CH38/EX38.5/EX38_5.sce


1
2
3
4
5
6
7
8
9
10
11

//chapter 38
//Example 5
clc
//given
m_0=(4*%pi*10^-7)//in weber
e_0=(8.9*10^-12)
R=5*10^-2//meters
dEbydT=10^12
B=(0.5*m_0*e_0*R*dEbydT)
disp(" magnetic field in weber/m^2=")
disp(B)