//chapter 21
//example 21.5
//page 957
printf("\n")
printf("given")
Rc=1*10^3;I=10*10^-3;E=30;
R1=E/I -Rc
R1=1.8*10^3;//use standard value
disp(" when dark Rc=100Kohm")
Rc=100*10^3;
I=E/(R1+Rc)