summaryrefslogtreecommitdiff
path: root/2135/CH5/EX5.11
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2135/CH5/EX5.11
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 '2135/CH5/EX5.11')
-rwxr-xr-x2135/CH5/EX5.11/Exa_5_11.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/2135/CH5/EX5.11/Exa_5_11.sce b/2135/CH5/EX5.11/Exa_5_11.sce
new file mode 100755
index 000000000..16408b726
--- /dev/null
+++ b/2135/CH5/EX5.11/Exa_5_11.sce
@@ -0,0 +1,22 @@
+//Exa 5.11
+clc;
+clear;
+close;
+format('v',8);
+
+//Given Data :
+T1=1200;//Kelvin
+T2=400;//Kelvin
+T0=300;//Kelvin
+Qsource=-150;//KJ/s
+Qsystem=150;//KJ/s
+deltaS_source=Qsource/T1;//KJ/sK
+deltaS_system=Qsystem/T2;//KJ/sK
+deltaS_net=deltaS_source+deltaS_system;//KJ/sK
+disp(deltaS_net,"Net change in entropy in KJ/sK : ");
+A1=(T1-T0)*-deltaS_source;//KJ/s
+disp(A1,"Available energy of heat source in KJ/s : ");
+A2=(T2-T0)*deltaS_system;//KJ/s
+disp(A2,"Available energy of system in KJ/s : ");
+E_decrease=A1-A2;//KJ/s
+disp(E_decrease,"Decrease in available energy in KJ/s : ");