summaryrefslogtreecommitdiff
path: root/1991/CH3/EX3.5/5.sce
blob: 03d6687089b7606ed1edbdd21952d86b5f8ceac3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clc
clear
//input data
amp=3.4*10^-5 //amplitude of the wave
af=5.7*10^2 //angular frequency
k=20 //wavenumber
//calculation
//wave frequency
f=af/(2*%pi)
l=(2*%pi)/k
v=f*l
printf("the wave frequency is %3.3f and the speed is %3.3f  m/s",f,v)
//calculating greatest speed for the wave to pass through
vmax=af*amp //greatest speed
//output
printf("\nthe greatest value of speed for the wave to pass through is %3.3f m/s",vmax)