//Example 21.1
clc;
V_max=200//in V
V_rms=(V_max)/sqrt(2)
R=100//in ohm
I_rms=V_rms/R
disp(V_rms,"Voltage in V=")
disp(I_rms,"Current in Amps=")