summaryrefslogtreecommitdiff
path: root/569/CH3/EX3.13/3_13.sci
blob: 51c705698c84bf01409c3c552da709e132c142dc (plain)
1
2
3
4
5
6
7
8
9
10
// Calculate the true power as a percentage of measured power
clc;
I=30.4;
R=0.015;
I_true=I*(1+0.012);
R_true=R*(1-0.003);
P_true=(I_true^2)*R_true;
P_measured=(I^2)*R;
R=P_true*100/P_measured;
disp(R,'true power as a percentage of measured power(%)=' )