blob: b6d9858616ce58a2959e3e55ca9e484b4785b657 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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");
|