summaryrefslogtreecommitdiff
path: root/167/CH4/EX4.5/ex5.sce
blob: 6bfa4ab1a34bfbb569fc3cdf888f915c29e707e1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//ques5
//Electric Heating of a Gas at Constant Pressure
clear
clc
V=120//voltage in V
I=0.2//current in Ampere
t=300//time in sec
We=V*I*t/1000//work done in kJ
//1-initial condition
P1=400//kPa initial Pressure 
V1=0.5//Volume in m^3
R=0.297//gas constant for water
T1=300//Temp in K
m=0.025;//mass in kg
//(a) From Energy equation We-Qout=dH=m(h2-h1)
//    i.e. h2=(We-Qout)/(m)+h1
//(b) Final Temperature
Qout=3.7//heat out in kJ
h1=2724.9//Initial Enthalpy in kJ/kg
h2=(We-Qout)/(m)+h1;//final Enthalpy in kJ/kg
//So from steam table A-6
T2=200;//Temp in C for P2=300kPa and h2
printf('Final Temperature T2 = %.0f C',T2);