summaryrefslogtreecommitdiff
path: root/1991/CH3/EX3.6/6.sce
blob: 66ca751af2d26e4bd9f5b7da4493cdad9e8fc337 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clc
clear
//input
k=16
w=23
//calculation
//1.wavelength
l=2*%pi/k
//output
printf("the wavelength is %3.3f m",l)
//2.wavespeed
v=(l*w)/(2*%pi)
printf("\nthe wavespeed is %3.3f m/s",v)
//3.pase difference
pha=(0.5*2*%pi)/0.39 // phase difference of molecules 0.5m apart 
printf("\n the phase difference is %3.3f radians",pha)