function calc(form) {

	var i;				// ループカウンタ
	var wk, wk2;		// 階乗積算用
	var bunbo, bunsi;	// 元利均等公式の分子、分母
	var wans;			// 月々のお支払額

	// （支払回数−１）乗の階乗を算出
	wk = 1+(1/12)*(form.nenri.value/100);
	wk2 = wk;			// 初期値退避
	for( i=1; i <= form.kaisuu.value-1; i++ )
	{
		wk2 = wk2*wk;
	}

	// 元利金等返済の月々のお支払金額算出
	bunbo = wk2 - 1;
	bunsi = wk2*(form.nenri.value/100)/12;
	wans = Math.floor(form.gankin.value*10000*bunsi/bunbo);

	// 月々のお支払額を100円単位に丸め処理
	if( (wans%100) != 0 )
	{
		wans = Math.floor(wans/100)*100+100;
	}

	// テキストボックスへ出力
	form.ans.value = wans + "円";

}