summaryrefslogtreecommitdiff
path: root/2294/CH12/EX12.52/EX12_52.sce
blob: 4b428f7e99886612e649fdbb6c42b5f309ed633e (plain)
1
2
3
4
5
//Example 12.52
//Find the average power.
Xo=-(4*%pi);X1=4*%pi
X=integrate('(1-(X/(4*%pi)))','X',Xo,X1)
disp(X/(4*%pi),'Average Power=')