1 files changed, 15 insertions, 0 deletions
diff --git a/32/CH7/EX7.13/7_13.sce b/32/CH7/EX7.13/7_13.sce
new file mode 100755
index 000000000..a3d65d3de
--- /dev/null
+++ b/32/CH7/EX7.13/7_13.sce
@@ -0,0 +1,15 @@
+//pathname=get_absolute_file_path('7.13.sce')
+//filename=pathname+filesep()+'7.13-data.sci'
+//exec(filename)
+//Minimum temperature(in K):
+Tmin=20+273
+//Maximum temperature(in K):
+Tmax=500+273
+//Efficiency of heat engine:
+n=0.25
+//Reversible engine efficiency:
+nrev=1-Tmin/Tmax
+//Second law efficiency:
+n2=n/nrev
+printf("\nRESULT")
+printf("\nSecond law efficiency = %f percent",n2*100)
+\ No newline at end of file