summaryrefslogtreecommitdiff
path: root/761/CH14/EX14.7/14_7.sce
blob: d6686a192d4223d2388114d3ebbe0466859155e8 (plain)
1
2
3
4
5
6
7
8
9
10
11
clc;
//page no 477
//prob no. 14.7
//A generator sends 50mW at 50ohm line & reflection coeff I=0.5
Pi=50;I=0.5;
//Determination of amount of power reflected
Pr=(I^2)*Pi;
disp('mW',Pr,'The amount of power reflected is');
//Determination of remainder power that reaches load
Pl=Pi-Pr;
disp('mW',Pl,'The power dissipated in load is');