1 files changed, 17 insertions, 0 deletions
diff --git a/1514/CH19/EX19.1/19_1.sce b/1514/CH19/EX19.1/19_1.sce
new file mode 100755
index 000000000..8753be49e
--- /dev/null
+++ b/1514/CH19/EX19.1/19_1.sce
@@ -0,0 +1,17 @@
+//chapter 19
+//example 19.1
+//page 590
+clear all;
+clc ;
+//given
+r=3;//distance from lamp in m
+L=25;//luminous flux or light energy in W
+E=100*L/(4*%pi*(r^2));//light intensity
+A=0.25;//area in cm^2
+printf("\nLight intensity =%.1f microW/cm^2",E);
+totphi=E*A;
+printf("\nTotal Flux =%.1f microW",totphi);
+
+
+
+