summaryrefslogtreecommitdiff
path: root/3769/CH9/EX9.17/Ex9_17.sce
blob: b770f5ffc20e9618765dbb7767a965337ed8e151 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clear
//Given
B=0.8
q=3.2*10**-19                //C
d=1.2
m=4*1.66*10**-27               //Kg
a=1.60*10**-19

//Calculation
//
r=d/2.0
K=(B**2*q**2*r**2)/(2.0*m*a)
v=(q*B*r)/m
f=(q*B)/(2.0*%pi*m)

//Result
printf("\n Frequency of alternating voltage is %0.2f  *10**7 HZ",f*10**-7)