summaryrefslogtreecommitdiff
path: root/3717/CH16/EX16.3/Ex16_3.sce
blob: 58be1fc2dcc86c1081974bb5d7bcb98069ca2e0b (plain)
1
2
3
4
5
6
7
8
9
10
// Ex16_3 Page:311 (2014)
clc;clear;
z = 30;    // Length of the optical fibre, km
alpha = 0.8;    // Fibre loss, dB/km
P_i = 200;    // Power input to the optical fibre, micro-watt
P_o = P_i/10^(alpha*z/10);    // Output power of the optical fibre, micro-watt
printf("\nThe output power from the optical fibre = %5.3f micro-watt", P_o);

// Result
// The output power from the optical fibre = 0.796 micro-watt