summaryrefslogtreecommitdiff
path: root/2354/CH4/EX4.8/4_8.sce
blob: e2660d5e8595e675f2adf588e6fe266fd3bd875a (plain)
1
2
3
4
5
6
7
8
9
10
//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()