summaryrefslogtreecommitdiff
path: root/3769/CH14/EX14.4/Ex14_4.sce
blob: e92241a68378da7b6a867e6acfb3a59f444fb942 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear
//Given
N=100
A=3
B=0.04                  //T
w=60
R=500                         //ohm

//Calculation
E0=N*A*B*w
I0=E0/R
P=E0*I0

//Result
printf("\n Maximum power dissipated in the coil is %0.3f  W", P)