1 files changed, 16 insertions, 0 deletions
diff --git a/1538/CH18/EX18.4/Ex18_4.sce b/1538/CH18/EX18.4/Ex18_4.sce
new file mode 100755
index 000000000..ee233676d
--- /dev/null
+++ b/1538/CH18/EX18.4/Ex18_4.sce
@@ -0,0 +1,16 @@
+//example-18.4
+//page no-547
+//given
+//resistance of wire
+R=21  //ohm
+//length of wire
+l=200  //m
+//diameter of wire
+d=0.44*10^-3  //m
+//area of cross section of wire
+A=(%pi)/4*d^2  //m^2
+//as we know that 
+//R=rho*l/A
+//so
+rho=R*A/l  //ohm m
+printf ("the specific resistance of wire is %e ohm m",rho)