summaryrefslogtreecommitdiff
path: root/1571/CH3/EX3.8/Chapter3_Example8.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1571/CH3/EX3.8/Chapter3_Example8.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1571/CH3/EX3.8/Chapter3_Example8.sce')
-rwxr-xr-x1571/CH3/EX3.8/Chapter3_Example8.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/1571/CH3/EX3.8/Chapter3_Example8.sce b/1571/CH3/EX3.8/Chapter3_Example8.sce
new file mode 100755
index 000000000..cd1d02f8a
--- /dev/null
+++ b/1571/CH3/EX3.8/Chapter3_Example8.sce
@@ -0,0 +1,21 @@
+clc
+clear
+
+//INPUT DATA
+d=0.02;//diameter of the copper wire in cm
+i=1;//current in amp
+T=100;//maximum steady temperature in deg.C
+r=2.1;//resistance of the wire in ohm cm
+J=4.2;//mechanical equivalent of heat in j/cal
+a=3.14*d^2/4;//area of the copper wire in sq.cm
+a2=1;//area of the copper surface in sq.cm
+
+//CALCULATIONS
+//we know that if r is the resistance of the wire through which current i flows,then the electrical energy spent =i^2*r j/sec
+l=1/(2*3.14*d/2);//length corresponding to the area in cm
+R=r*l/a;//resistance of the copper wirein ohm
+w=R*a2^2;//work done in joule
+h=w/J;//heat devoleped in cal
+
+//OUTPUT
+mprintf('the heat developed is %3f calories',h)