clc;
clear;
a=10; //Amplitude in V
Pt=a*(0.18^2 +2*(0.33^2 +0.05^2+0.36^2+0.39^2+0.26^2+0.13^2+0.05^2+0.02^2+0.01^2));

disp(" For B=5 from the Bessel table,The Bessel Function is taken upto J9");
disp(Pt," Hence the average power of the modulated signal (in W) is");
disp("Hence, the average power of the modulated signal is equal to ");
disp("unmodulated carrier power");