summaryrefslogtreecommitdiff
path: root/632/CH11/EX11.29/example11_29.sce
blob: 7008a75fc81ccb948344f164a4031d04cfe43e58 (plain)
1
2
3
4
5
//clc()
W = -2.25*745.7;//W ( work done on the system and 1hp = 745.7W)
Q = -3400;//kJ/h ( Heat transferred to the surrounding )
U = Q*1000/3600 - W;
disp("J/s",U,"Rise in the Internal energy of the system = ")