1 files changed, 10 insertions, 0 deletions
diff --git a/1760/CH1/EX1.39/EX1_39.sce b/1760/CH1/EX1.39/EX1_39.sce
new file mode 100755
index 000000000..fcbc6f6f8
--- /dev/null
+++ b/1760/CH1/EX1.39/EX1_39.sce
@@ -0,0 +1,10 @@
+                   //EXAMPLE 1-39    PG NO-32-33
+V=440;               //voltage
+V1=5;                  //voltage
+R=40;            //resistance
+V2=220;
+V3=100;
+Rv=(V3*R)/[V2-V3];            //insulation resistance
+disp('i)Resistance (Rv) = ' + string (Rv)+' Kohm')
+Ri=[Rv*(V-V1)]/V1;            //insulation resistance
+disp('iii)Resistance(Ri) = '+string (Ri)+' Kohm')