//example 4.8
clc; funcprot(0);
// Initialization of Variable
Q=-20;
m=2;
u2=143.98;
u1=92.04;
W=Q-m*(u2-u1);
disp(W,"work done on the system in Btu");
clear()