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

clear;

//Variable declaration
E=81
c=3*10**8             //speed of ligth

//Calculations
n=sqrt(E)
V=c/n/10**7

//Result
mprintf("Refractive index n= %d",n)
mprintf("\nVelocity of light= %.2f*10**7 m/sec",V)