プログラムはこんな感じです。