1 files changed, 8 insertions, 0 deletions
diff --git a/1535/CH2/EX2.4/Ch02Ex4.sci b/1535/CH2/EX2.4/Ch02Ex4.sci
new file mode 100755
index 000000000..389798653
--- /dev/null
+++ b/1535/CH2/EX2.4/Ch02Ex4.sci
@@ -0,0 +1,8 @@
+// Scilab Code Ex2.4 : Page-47 (2010)
+p = 60;    // Power rating of bulb, watt
+d = 0.5;    // Distance from the blb, m
+P = p/(4*%pi*d^2);    // Value of Poynting vector, watt per metre square
+printf("\nThe value of Poynting vector = %4.1f watt per metre square", P);
+
+// Result 
+// The value of Poynting vector = 19.1 watt per metre square 
+\ No newline at end of file