diff options
Diffstat (limited to '2135/CH1/EX1.33')
-rwxr-xr-x | 2135/CH1/EX1.33/Exa_1_33.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/2135/CH1/EX1.33/Exa_1_33.sce b/2135/CH1/EX1.33/Exa_1_33.sce new file mode 100755 index 000000000..e848b3ed4 --- /dev/null +++ b/2135/CH1/EX1.33/Exa_1_33.sce @@ -0,0 +1,16 @@ +//Exa 1.33
+clc;
+clear;
+close;
+format('v',9);
+
+//Given Data :
+T1=300;//K
+T2=2300;//K
+Gamma=1.5;
+m=1;//Kg
+//Cp=0.85+0.0004*T+50*10^-5*T^2
+H2subH1=integrate('m*(0.85+0.00004*T+5*10^-5*T^2)','T',T1,T2);//KJ/Kg
+disp(H2subH1,"Change in enthalpy in KJ/Kg : ");
+U2subU1=integrate('m*(0.85+0.00004*T+5*10^-5*T^2)/Gamma','T',T1,T2);//KJ/Kg
+disp(U2subU1,"Change in internal energy in KJ : ");
|