問題これです。

http://www.ktc.ac.jp/class/masakiyo/programming_gengo3/20050627練習問題６.htm