summaryrefslogtreecommitdiff
path: root/2252/CH6/EX6.9/Ex6_9.sce
blob: bf3f1b42a14c12cedd497b61c7927b7314212067 (plain)
1
2
3
4
5
6
7
8
9
10
11

//let us assume V=1 V, T=1 sec
//e=V*t/T
V=1
T=1
Erms=sqrt(integrate("(V*t/T)^2","t",0, T)/T)
mprintf("RMS value of voltage is %f times maximum voltage\n",Erms/V)
Emean=integrate("V*t/T","t",0,T)/T
k=Erms/Emean
mprintf("Form factor of this wave=%f",k)