リスト1のプログラム