1 files changed, 18 insertions, 0 deletions
diff --git a/605/CH2/EX2.15/2_15.sce b/605/CH2/EX2.15/2_15.sce
new file mode 100755
index 000000000..e7b86e20a
--- /dev/null
+++ b/605/CH2/EX2.15/2_15.sce
@@ -0,0 +1,18 @@
+//data in question
+To=290
+//bandwidth(Hz)
+B=500*10^3
+k=1.38*10^-23
+//noise factor
+F=10^(8/10)
+//input power at IP
+Pip=10
+printf("\nB=500kHz\tF=8 dB\tPip=10 dBm")
+//equations and result
+Nf=k*To*B*F
+printf("\nNf=k*To*B*F=%.4e",Nf)
+printf(" = %.2f dBm",10*log10(Nf*1000))
+Nf=10*log10(Nf*1000)   //Nf in dBm
+DR=2/3*(Pip-Nf)    //DR in dB; Pip,Nf in dBm
+printf("\ndynamic range\nDR=2/3*(Pip-Nf)=%.2f dB",DR)
+