clc; ApdB=50; Ap=10^(ApdB/10); Pin=0.001; //watt Pout=Pin*Ap; //watt disp('W',Pout,"Pout=");