summaryrefslogtreecommitdiff
path: root/761/CH1/EX1.4/1_4.sce
blob: 1b719038c4cc9bb01d023bbb541cefe8b283991e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc;
// page no 18
// prob no. 1.4
// In given problem noise power bandwidth is 10kHz; resistor temp T(0c)=27
// First we have to convert temperature to kelvins:
T0c=27;
Tk=T0c+273;
// noise power contributed by resistor , Pn= k*T*B
k=1.38*10^(-23);
B=10*10^3;
Pn= k*Tk*B;
disp('W',Pn,'noise power contributed by resistor');