summaryrefslogtreecommitdiff
path: root/605/CH2/EX2.13/2_13.sce
diff options
context:
space:
mode:
Diffstat (limited to '605/CH2/EX2.13/2_13.sce')
-rwxr-xr-x605/CH2/EX2.13/2_13.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/605/CH2/EX2.13/2_13.sce b/605/CH2/EX2.13/2_13.sce
new file mode 100755
index 000000000..14bae0817
--- /dev/null
+++ b/605/CH2/EX2.13/2_13.sce
@@ -0,0 +1,25 @@
+//noise factor
+F=10^(10/10)
+//equation and result
+printf("\nresult:-")
+printf("\n(a)B=1MHz")
+B=1
+Pimds=-111+F+10*log10(B) //F in dB, B in MHz, Pidms in dBm
+printf("\n\tPimds=-111+F+10*log10(B)\n\tPimds=%.1f dBm",Pimds)
+printf(" = %.2e mW",10^(Pimds/10))
+printf("\n(b)B=1GHz")
+B=1000
+Pimds=-111+F+10*log10(B) //F in dB, B in MHz, Pidms in dBm
+printf("\n\tPimds=-111+F+10*log10(B)\n\tPimds=%.1f dBm",Pimds)
+printf(" = %.2e mW",10^(Pimds/10))
+
+printf("\n(c)B=10GHz")
+B=10000
+Pimds=-111+F+10*log10(B) //F in dB, B in MHz, Pidms in dBm
+printf("\n\tPimds=-111+F+10*log10(B)\n\tPimds=%.1f dBm",Pimds)
+printf(" = %.2e mW",10^(Pimds/10))
+printf("\n(d)B=1kHz")
+B=0.001
+Pimds=-111+F+10*log10(B) //F in dB, B in MHz, Pidms in dBm
+printf("\n\tPimds=-111+F+10*log10(B)\n\tPimds=%.1f dBm",Pimds)
+printf(" = %.2e mW",10^(Pimds/10)) \ No newline at end of file