summaryrefslogtreecommitdiff
path: root/3828/CH9/EX9.1/Ex9_1.sce
blob: 98df923035bde0802785fe41a31facd929d5ab17 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Chapter 9 : Electromagnetic Theory

clear;

//Variable declaration
P=60                   //Power
r=2                    //distance from source
epsilon0=8.85*10**-12
C=3*10**2

//Calculations
E0=sqrt((P*2)/(4*%pi*r**2*C*epsilon0))/1000

//Result
mprintf("Amplitude of field E= %.0f V/m",E0)