blob: ae28b3d0377dc487f2de07995cf4afbdb78dbc0f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
//Chapter-4, Example 4.6, Page 134
//=============================================================================
clc
clear
//INPUT DATA
N=200;//no of turns
a=250;//area of cross-section in sq.cm
Bm=0.5;//magnetic field strength in Tesla
speed=1200;//in r.p.m
//CALCULATIONS
w=2*%pi*(speed/60);//angular freq in rad/sec
phi=Bm*a*10^-4;//area taken in sq.m
Em=N*w*phi;//maximum value of induced Emf
mprintf("maximum value of induced Emf is %d volts\n",Em);
//equation for instantaneous induced emf is e=Em*sin(w*t)
//when plane of coil is parallel to field ,theta is 90 degrees
e1=Em*sin(%pi/2);//converted degrees to radians
mprintf("when plane of coil is parallel to field, induced Emf is %d volts\n",e1);
//when plane of coil is parallel to field ,theta is 0 degrees
e2=Em*sin(0);
mprintf("when plane of coil is perpendicular to field, induced Emf is %d volts\n",e2);
//when plane of coli is inclined at 45 degrees to the field
e3=Em*sin(%pi/4);
mprintf("when plane of coil is at 45 degrees to field, induced Emf is %d volts\n",e3);
//=================================END OF PROGRAM==============================
|
