//pagenumber 108 example 11
clear
r=250;//ohm
c=40*10^-6;//farad
alpha1=180-atand(377*r*c);
disp("alpha   =   "+string(alpha1)+"degre");