summaryrefslogtreecommitdiff
path: root/551/CH2/EX2.17
diff options
context:
space:
mode:
Diffstat (limited to '551/CH2/EX2.17')
-rwxr-xr-x551/CH2/EX2.17/17.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/551/CH2/EX2.17/17.sce b/551/CH2/EX2.17/17.sce
new file mode 100755
index 000000000..22257a89b
--- /dev/null
+++ b/551/CH2/EX2.17/17.sce
@@ -0,0 +1,13 @@
+clc
+T=1.25; //N.m
+N=9500;
+W1=2*%pi*N*T/1000; //kJ
+p=101.3; //kPa
+d=0.65; //m
+A=%pi/4*d^2; //m^2
+L=0.6; //m
+W2=p*A*L; //kJ
+Wnet=(-W1)+W2;
+disp("The net work transfer for the system=")
+disp(Wnet)
+disp("kJ") \ No newline at end of file