3769/CH11/EX11.6/Ex11_6.sce


1
2
3
4
5
6
7
8
9
10
11

clear
//Given
M=8.0*10**22                  //Am**2
R=64*10**5                    //m

//Calculation
//
I=(3*M)/(4.0*%pi*R**3)

//Result
printf("\n earths magnetisation is %0.1f  A/m",I)