開発環境 メモ帳
実行環境 Internet Explorer 11



sagitta.html
<!doctype html>
<head>
<title>sagitta</title>
<script>
 
function onKeyDown(event)
{
	if (event.keyCode == 13) {
		calc();
	}
}
 
function calc()
{
	var L = parseFloat(arc.value);	// 弧長
	if (isNaN(L) || L < 0 || 20000 < L) {
		output.innerHTML = "範囲は0~20000です。";
		return;
	}
	output.innerHTML = "";
 
	var td = 360 * L / 40000;
	var tr = Math.PI * td / 180;
	output.innerHTML += "中心角=" + td + "度<br>";
 
	var r = 40000 / (2 * Math.PI);
	output.innerHTML += "半径=" + r + "km<br>";
 
	var h = r * (1 - Math.cos(tr / 2));
	output.innerHTML += "矢高(円弧の高さ)=" + h + "km<br>";
}
 
</script>
</head>
 
<body>
地球を円周40,000kmの真球と仮定する。<br>
円弧の長さ<input id="arc" value=20 onkeydown="onKeyDown(event)" autofocus />km<br>
<button type="button" onclick="calc()">calc</button><br>
<div id="output"></div>
</body>
 
最終更新:2015年02月25日 17:30