clc;clear;
//Example 7.1

//given data
Q=750;
Tsys=300;

//calculations
dSsys=Q/Tsys;
disp(dSsys,'Entropy change in the process in kJ/K')