diff options
Diffstat (limited to '1553/CH11/EX11.17')
| -rw-r--r-- | 1553/CH11/EX11.17/11Ex17.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1553/CH11/EX11.17/11Ex17.sce b/1553/CH11/EX11.17/11Ex17.sce new file mode 100644 index 000000000..b6d985861 --- /dev/null +++ b/1553/CH11/EX11.17/11Ex17.sce @@ -0,0 +1,15 @@ +//Chapter 9 Ex 17
+
+clc;
+close;
+clear;
+x=poly(0,'x');
+loss=10;
+SP1=x;
+SP2=(2/3)*SP1; //given
+CP=(100/(100-loss))*SP2;
+gain=SP1-CP;
+gainper=(gain/CP)*100;
+mprintf("The gain percentage is");
+disp(gainper)
+mprintf("percent");
|