343/CH2/EX2.10/ex2_10.sce


1
2
3
4
5

Vm=1;        //Assuming Vm=1
function y=f(t),y=Vm*Vm*sin(t)*sin(t),endfunction      //Defining Voltage Equation
T=2*%pi;
Res=sqrt(intg(0,%pi,f)/(T));
disp("Volts",Res,"Rms value of voltage");