diff options
Diffstat (limited to '3831/CH10/EX10.5/Ex10_5.sce')
| -rw-r--r-- | 3831/CH10/EX10.5/Ex10_5.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3831/CH10/EX10.5/Ex10_5.sce b/3831/CH10/EX10.5/Ex10_5.sce new file mode 100644 index 000000000..0177ce161 --- /dev/null +++ b/3831/CH10/EX10.5/Ex10_5.sce @@ -0,0 +1,14 @@ +// Example 10_5
+clc;funcprot(0);
+// Given data
+Q=-100;// W
+W=-100;// W
+T_b=24.0+273;// K
+p_0=0.101;// MPa
+T_0=15.0+273;// K
+
+// Calculation
+dVbydt=0;
+dAbydt=0;
+I=((1-(T_0/T_b))*Q)-W+(p_0*dVbydt)-dAbydt;// W
+printf("\nThe irreversibility rate within the room,I=%2.1f W",I);
|