summaryrefslogtreecommitdiff
path: root/3809/CH8/EX8.4/EX8_4.sce
blob: 76dcbc22a48dbe2560324ddc95a9a1bd3966f27b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
//Chapter 8, Example 8.4
funcprot()
clc
//Initialisation
p1=20                           //gain
p2=30                           //gain
p3=40                           //gain



//initialising a function for gain 
function [x]=pgain(a)            //function for power gain
  x=10**(a/10)
endfunction

function [x]=vgain(a)            //function for voltage gain
  x=10**(a/20)
endfunction

//calling a functions
[pd1]=pgain(p1)
[pd2]=pgain(p2)
[pd3]=pgain(p3)
[vd1]=vgain(p1)
[vd2]=vgain(p2)
[vd3]=vgain(p3)

//Result
printf("Power Gain (dB) of 20 = %.1f dB\n",pd1)
printf("Voltage Gain (dB) of 30 = %.1f dB\n\n",vd1)
printf("Power Gain (dB) of 40 = %.1f dB\n",pd2)
printf("Voltage Gain (dB) of 20 = %.1f dB\n\n",vd2)
printf("Power Gain (dB) of 30 = %.1f dB\n",pd3)
printf("Voltage Gain (dB) of 40 = %.1f dB\n",vd3)