1376/CH4/EX4.3/4_3.sci


1
2
3
4
5
6
7
8
9

//4.3
clc;
//V=Eexp(-t/tc)   where tc= RC=Time constant
t=30;
V=125;
E=200;
tc=-30/log(V/E);
R=(7/15)*tc-7;
printf("Insulation resistance=%.2f mega-ohm",R)