1 files changed, 14 insertions, 0 deletions
diff --git a/1922/CH4/EX4.1/4_1.sce b/1922/CH4/EX4.1/4_1.sce
new file mode 100755
index 000000000..b64f274c5
--- /dev/null
+++ b/1922/CH4/EX4.1/4_1.sce
@@ -0,0 +1,14 @@
+clc
+clear
+//Initialization of variables
+T=500 //K
+Qr=5*10^6 //kJ
+T2=600 //K
+//calculations
+dSS=Qr/T
+dSS2=-Qr/T2
+Ds=dSS+dSS2
+//results
+printf("Entropy change of the system = %d kJ/K",dSS)
+printf("\n Entropy change of the surroundings = %d kJ/K",dSS2)
+printf("\n Entropy change if the universe = %d kJ/K",Ds)