path: root/1658/CH5/EX5.12/Ex5_12.sce

clc;
VS=5;
R=510;
VF=0.7;
VR=VS-0.7;
disp('V',VR*1,"VR=");
I=VR/R;
disp('mA',I*10**3,"I=");