ドップラー効果

 投稿者：しばっち  投稿日：2016年 5月28日(土)20時45分57秒
  ドップラー効果

INPUT  PROMPT "音源周波数(Hz)":F0
INPUT  PROMPT "音源の速度(Km/h)":VS
INPUT  PROMPT "観測者の速度(Km/h)":V0
INPUT  PROMPT "気温 (℃)":T
LET V=331.5+.61*T
LET V=V*3.6
LET F=F0*((V-V0)/(V-VS))
PRINT "周波数";F;"Hz"
END
 		 

戻る