diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /858/CH6/EX6.16/example_16.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '858/CH6/EX6.16/example_16.sce')
-rwxr-xr-x | 858/CH6/EX6.16/example_16.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/858/CH6/EX6.16/example_16.sce b/858/CH6/EX6.16/example_16.sce new file mode 100755 index 000000000..00bcd6581 --- /dev/null +++ b/858/CH6/EX6.16/example_16.sce @@ -0,0 +1,18 @@ +clc
+clear
+printf("example 6.16 page number 264\n\n")
+
+//to find the percentage extraction of nicotine
+x=0.01; //% of nicotine
+X0 = x/(1-x);
+w=150 //weight of nicotine water solution
+A0=w*(1-X0);
+B0=250; //kg keroscene
+X1 = A0*X0/(A0+B0*0.798);
+printf("final concentration of nicotine = %f",X1)
+
+c=A0*(X0-X1);
+printf("\n\namount of nicotine removed = %f kg",c)
+
+percentage = (c*100)/(A0*x);
+printf("\n\npercentage recovery = %f percent",percentage)
|