Calculate the thermal noise or white noise, Noise Power, and Noise Voltage.

// Calculate the thermal noise or white noise, Noise Power, and Noise Voltage.  
K=1.38*10^-23; // Boltzmann's constant
B=10000; // absolute temperature
T=290; // bandwidth

// Thermal or white noise.
N=K*B*T;
disp("Noise =");
disp(N);

// Noise Power
Ndb=-174+10*log10(B);
disp("Noise Power =");
disp(Ndb);

// Noise Voltage of a Noisy resistor. Vn=sqrt(4*R*N); 
// where, R=100. You can change the value of R. 
Vn=sqrt(4*100*N);
disp("Noise Voltage =");
disp(Vn);

// Output


          Calculate the thermal noise or white noise, Noise Power, and Noise Voltage.