summaryrefslogtreecommitdiff
path: root/2354/CH7/EX7.8/7_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '2354/CH7/EX7.8/7_8.sce')
-rwxr-xr-x2354/CH7/EX7.8/7_8.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/2354/CH7/EX7.8/7_8.sce b/2354/CH7/EX7.8/7_8.sce
new file mode 100755
index 000000000..e1c98f0fb
--- /dev/null
+++ b/2354/CH7/EX7.8/7_8.sce
@@ -0,0 +1,14 @@
+//example 7.8
+clc; funcprot(0);
+// Initialization of Variable
+p1=1;//pressure
+pr2=21.18;
+pr1=1.3860;
+k=1.39;
+T2=1160;//temperature
+T1=540;//temperature
+p=p1*pr2/pr1;
+disp(p,"pressure in atm");
+p2=p1*(T2/T1)^(k/(k-1));
+disp(p2,"Pressure final in atm");
+clear()