summaryrefslogtreecommitdiff
path: root/858/CH6/EX6.16
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /858/CH6/EX6.16
downloadScilab-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')
-rwxr-xr-x858/CH6/EX6.16/example_16.sce18
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)