path: root/1658/CH5/EX5.13/Ex5_13.sce

clc;
VS=6;
VD1=0.7;
VD2=0.7;
VR=1.5*10**3;
I=(VS-VD1-VD2)/VR;
disp('mA',I*10**3,"I=");