summaryrefslogtreecommitdiff
path: root/3802/CH4/EX4.28
diff options
context:
space:
mode:
Diffstat (limited to '3802/CH4/EX4.28')
-rw-r--r--3802/CH4/EX4.28/Ex4_28.jpgbin0 -> 21777 bytes
-rw-r--r--3802/CH4/EX4.28/Ex4_28.sce23
2 files changed, 23 insertions, 0 deletions
diff --git a/3802/CH4/EX4.28/Ex4_28.jpg b/3802/CH4/EX4.28/Ex4_28.jpg
new file mode 100644
index 000000000..8ee59508b
--- /dev/null
+++ b/3802/CH4/EX4.28/Ex4_28.jpg
Binary files differ
diff --git a/3802/CH4/EX4.28/Ex4_28.sce b/3802/CH4/EX4.28/Ex4_28.sce
new file mode 100644
index 000000000..49d756ffd
--- /dev/null
+++ b/3802/CH4/EX4.28/Ex4_28.sce
@@ -0,0 +1,23 @@
+//Book Name:Fundamentals of Electrical Engineering
+//Author:Rajendra Prasad
+//Publisher: PHI Learning Private Limited
+//Edition:Third ,2014
+
+//Ex4_28.sce.
+
+clc;
+clear;
+t1=1.5; //Insulation thickness of conductor in cm
+d_c=1.5; //Diameter of conductor in cm
+a1=d_c/2;
+b1=a1+t1;
+R1=500; //Insulation resistance in megaohm for a given thickness
+R2=700; //Insulation resistance in megaohm for a unknown thickness
+
+//R=(p/(2*%pi*l))*log(b/a) R1=(p/(2*%pi*l))*log(b1/a1) R2=(p/(2*%pi*l))*log(b2/a2)
+
+a2=d_c/2;
+b2=a2; //b2 is the sum of a2 and unknown thickness
+
+t2=a2*(b1/a1)^(R2/R1)-b2; //thickness of 700 megaohm resistance insulation in cm
+printf("\n Insulation thickness of the cable if insulation resistance is 700 megaohm=%1.3f cm",t2)