前にコメント頂いたプログラム組みの 投稿したので間違っていたら指摘お願い致します