こんなプログラムです。