summaryrefslogtreecommitdiff
path: root/3769/CH27/EX27.20/Ex27_20.sce
blob: 0f7ef5d5a4653b5c77414b26681276424095760a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clear
//Given
a=200
b=50
c=17
d=5
e=4000

//Calculation
Ib=(a-b)*10**-3
Ic=c-d
B=Ic/Ib
D=e/B
Ap=B**2*D

//Result
printf("\n  The value of power gain is %0.3f  *10**5",Ap*10**-5)