diff options
Diffstat (limited to '51/CH5/EX5.15/5_15.sce')
-rwxr-xr-x | 51/CH5/EX5.15/5_15.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/51/CH5/EX5.15/5_15.sce b/51/CH5/EX5.15/5_15.sce new file mode 100755 index 000000000..5309b859a --- /dev/null +++ b/51/CH5/EX5.15/5_15.sce @@ -0,0 +1,16 @@ +clc;
+clear;
+v1=200;//m/s
+v2=500;//m/s
+A1=1;//m^2
+p1=78.5;//kPa(abs)
+T1=268;//K
+p2=101;//kPa(abs)
+
+//F=-p1*A1 + p2*A2 + m*(v2-v1)
+//m=d1*A1*v1
+//d1=(p1)/(R*T1)
+d1=(p1*1000)/(286.9*T1);
+m=d1*v1*A1;
+F=-((p1-p2)*A1*1000) + m*(v2-v1);
+disp("N",F,"The thrust for which the stand is to be designed=")
\ No newline at end of file |