blob: 23bbc1881bd0a3ae4bdcf926a68105bce46c8677 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
clc;
clear;
P=10^-3 //power in watt
A=3*10^-6 //cross section area in m^2
n=1 //refractive index
c=3*10^8 //velocity of light in m/s
myu=4*10^-7 //vaccum permittivity
//calculation
I=P/A // Intensity in W/m^2s
E_0=sqrt((2*c*myu*I)/n)
mprintf("The electic field of the laser beam is = %d V/m",E_0)
//The answer provided in the textbook is wrong
|
