clc;
//page no 566
//prob no. 16.2
//A dipole antenna with radiatn resistance=67ohm & loss resistance 5ohm
Rr=67;Rl=5;
//Determination of efficiency 
eta=Rr/(Rr+Rl);
disp('%',eta,'The efficiency of dipole antenna is');