diff options
Diffstat (limited to '1472/CH17/EX17.1.b/17_1b.sce')
-rwxr-xr-x | 1472/CH17/EX17.1.b/17_1b.sce | 27 |
1 files changed, 14 insertions, 13 deletions
diff --git a/1472/CH17/EX17.1.b/17_1b.sce b/1472/CH17/EX17.1.b/17_1b.sce index 0a7bb1974..d97b02f13 100755 --- a/1472/CH17/EX17.1.b/17_1b.sce +++ b/1472/CH17/EX17.1.b/17_1b.sce @@ -1,13 +1,14 @@ -clc
-//initialization of varaibles
-k=1.3
-P=100 //psia
-//calculations
-Pratio=(2/(k+1))^(k/(k-1))
-Pt=Pratio*P
-disp("From table 3,")
-ht=1221.5 //B/lb
-vt=8.841 //cu ft/lb
-at=w*vt/1700
-//results
-printf("Throat area = %.4f sq ft",at)
+clc +//initialization of variables +w = 1; +k=1.3 +P=100 //psia +//calculations +Pratio=(2/(k+1))^(k/(k-1)) +Pt=Pratio*P +disp("From table 3,") +ht=1221.5 //B/lb +vt=8.841 //cu ft/lb +at=w*vt/1700 +//results +printf("Throat area = %.4f sq ft",at)
\ No newline at end of file |