summaryrefslogtreecommitdiff
path: root/1991/CH9/EX9.5/5.sce
diff options
context:
space:
mode:
Diffstat (limited to '1991/CH9/EX9.5/5.sce')
-rwxr-xr-x1991/CH9/EX9.5/5.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/1991/CH9/EX9.5/5.sce b/1991/CH9/EX9.5/5.sce
new file mode 100755
index 000000000..544a7098b
--- /dev/null
+++ b/1991/CH9/EX9.5/5.sce
@@ -0,0 +1,12 @@
+clc
+clear
+//input
+e1=350//heat per second
+t=7+273 //teperature
+sig=5.7*10^-8//stephans constant
+//calculation
+e2=e1*4//stephans law
+E=sig*(t^4-t^4)//stephans law
+//output
+printf("the rate of emission is %3.3f W",e2)
+printf("\nthe rate of emission when outer temperature is increased is %d W",E)