summaryrefslogtreecommitdiff
path: root/569/CH3/EX3.18/3_18.sci
blob: bbd464582c5813d00e352d87f245b222cfd2ffb1 (plain)
1
2
3
4
5
6
7
8
9
10
11
// Calculate apparent resistance, actual resistance and error
clc;
Et=100;
It=5*10^-3;
Rt=Et/It;
disp(Rt,'apparent value of resistance (ohm)=')
Rv=1000*150;
Rx=Rt*Rv/(Rv-Rt);
disp(Rx,'true value of resistance(ohm)')
Er_percentage=[(Rt-Rx)/Rx]*100;
disp(Er_percentage,'percentage error=')