1 files changed, 12 insertions, 0 deletions
diff --git a/632/CH9/EX9.1/example9_1.sce b/632/CH9/EX9.1/example9_1.sce
new file mode 100755
index 000000000..c1d0df7cb
--- /dev/null
+++ b/632/CH9/EX9.1/example9_1.sce
@@ -0,0 +1,12 @@
+//clc()
+PC1 = 85;//% ( Percent carbon in coal )
+PA1 = 15;//% ( Percent ash in coal )
+PA2 = 80;//% ( Percent ash in cinder )
+PC2 = 20;//% ( Percent carbon in cinder )
+m = 100;//kg (weight of coal )
+mash = PA1 * m / 100;
+w = mash * 100 / PA2;// weight of cinder
+mcarbon = w - mash;
+Plost = mcarbon * 100 / ( m - mash );
+disp("kg",w,"weight of cinder formed = ")
+disp("%",Plost,"Percent fuel lost = ")
+\ No newline at end of file