% for problem in Skolnik
clear
fp1=4000;
fp2=3505;
Rap1=7.0;
Rap2=18.6;
c=3e8;
n2m=1852;
disp('i or j      (PRF 1)          (PRF 2) ')
for i=1:7
    A=c*i/fp1/2/1852+Rap1;
    B=c*i/fp2/2/1852+Rap2;
    disp(['       ',num2str(i),'       ',num2str(A),'          ',num2str(B)])
end