summaryrefslogtreecommitdiff
path: root/1019/CH2/EX2.7/Example_2_7.sce
blob: bc8f98c60431168db2138266442169c1b3541dd0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Example 2.7
clear;
clc;

//Given
n=2;//moles of ideal gas
R=8.314;// gas constant in J K^-1 mol^-1
T=273;// temperature in K
p1=10;// initial pressure in atm
p2=0.4;// final pressure in atm

// To determine q,w,delH and DelE
w=(-1)*n*R*T*(1-(p2/p1));// w in joule
q=(-1)*w;
mprintf('q = %f J',q);
mprintf('\n w = %f J',w);
mprintf('\n delE = 0 J,since it is an isothermal process');
mprintf('\n delH = 0 J,since it is an isothermal process');
//end