diff options
Diffstat (limited to '1991/CH9/EX9.5/5.sce')
-rwxr-xr-x | 1991/CH9/EX9.5/5.sce | 12 |
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)
|