summaryrefslogtreecommitdiff
path: root/3755/CH12/EX12.4/Ex12_4.sce
blob: bf6c51c568af62f0652437248b019a2b973d972f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clear
//
//
//

//Variable declaration
P=10*10^-3;     //power(W)
d=1.3*10^-3;      //diameter(m)

//Calculation
I=4*P/(%pi*d^2);      //intensity of beam(W/m^2)

//Result
printf("\n intensity of beam is %0.1f kW/m^2",I/10^3)