summaryrefslogtreecommitdiff
path: root/2381/CH12/EX12.8/ex_8.sce
blob: 74795b381794ba1cb0fea02a895459aada8037f5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Example 8//frequency
clc;
clear;
close;
r=3;//m
w=10;//s^-1
vs=r*w;//m/s
A=6;//m
fd=5/%pi;//s^-1
vmax=A*2*%pi*fd;//m/s
v=330;//m/s
n=340;//Hz
nmax=((v+vmax)/(v-vs))*n;//Hz
nmin=((v-vmax)/(v+vs))*n;//Hz
disp(nmax,"maximum frequency is,(Hz)=")
disp(nmin,"minimum frequency is ,(Hz)=")