summaryrefslogtreecommitdiff
path: root/1979/CH9/EX9.6/Ex9_6.sce
blob: 663f23577d509d1548c532f264fa6ff5451038ce (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//chapter-9 page 412 example 9.6
//==============================================================================
clc;
clear;

//For an IMPATT diode power amplifier
Rd=25;//Negative Resistance in ohms
Rl=50;//Load Resistance in ohms

//CALCULATION
x=abs(Rd);
G=((-x-Rl)/(-x+Rl))^2;//Power gain of an IMPATT diode

//OUTPUT
mprintf('\nPower gain of an IMPATT diode is G=%1.0f',G);

//=========================END OF PROGRAM===============================