//example 4.10
clc; funcprot(0);
// Initialization of Variable
D=1;
I1=108;
I2=95;
P=1;
//calculation
I=I1-I2;
Pr=P*10^(I/10);
disp(Pr,"power provided in watt:")
clear()