blob: 30d26fc6eb5d8853a762a9f09d71373642ebf946 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//Example number 6.2, Page number 6.46
clc;clear;close
// Variable declaration
e=1.6*10**-19; // charge(coulomb)
new=6.8*10**15; // frequency(revolutions per second)
mew0=4*%pi*10**-7; // coefficient
R=5.1*10**-11; // radius(m)
// Calculation
i=(e*new); // current(ampere)
B=mew0*i/(2*R); // magnetic field at the centre(weber/m**2)
A=%pi*R**2; // in m^2
d=i*A; // dipole moment(ampere/m**2)
// Result
printf("magnetic field at the centre is : %.f weber/m**2",B)
printf("\ndipole moment is : %.e Ampere/m**2",(d))
|