定期代
;;; 大宮までの電車代を求める (defun check_price (month teiki-price kaisu katamiti) (- (* (* (/ (* month 30) 7.0) kaisu) ; 実際に何回通うか (* (/ (* katamiti 10) 11.0) ; 回数券は片道 * 10で11回分乗れる 2)) teiki-price)) (check_price 1 17000 3 570) ;; 1ヶ月 週3回 -3675.325 (check_price 3 48450 3 570) ;; 3ヶ月 週3回 -8475.977 (check_price 6 81650 3 570) ;; 6ヶ月 週3回 -1701.953 (check_price 1 17000 4 570) ;; 1ヶ月 週4回 766.2324 (check_price 3 48450 4 570) ;; 3ヶ月 週4回 4848.699 (check_price 6 81650 4 570) ;; 6ヶ月 週4回 24947.4
週3回以下の場合には回数券のほうが安い。4回以上ならば定期券のほうが安い。
ちなみに定期代はhttp://www.calc.eki-net.com/asp/tcalcweb_input.aspで調べられる。