343/CH2/EX2.15/ex2_15.sce


1
2
3
4
5

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