diff options
Diffstat (limited to '2087/CH16/EX16.8/example16_8.sce')
| -rwxr-xr-x | 2087/CH16/EX16.8/example16_8.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/2087/CH16/EX16.8/example16_8.sce b/2087/CH16/EX16.8/example16_8.sce new file mode 100755 index 000000000..70e56c72c --- /dev/null +++ b/2087/CH16/EX16.8/example16_8.sce @@ -0,0 +1,14 @@ +
+
+//example16.8
+//calculate ratio of discharge at A and B;ratio of average rainfall at A and B
+clc;funcprot(0);
+//given
+r1=2; //ka/kb
+r2=1/1.5; //La/Lb
+r3=5/6; //(b^2-a^2)a/((b^2-a^2)b)
+
+Rq=r1*r3/r2;
+Rp=Rq/r2;
+mprintf("ratio of discharge at A and B=%f.",Rq);
+mprintf("\nratio of average rainfall at A and B=%f.",Rp);
|