あとは138-143、153-156も、Ｉではない別変数を使ってFOR文をネスト（入れ子。FOR文の中にさらにFOR文を書く）で回してやれば完璧ですね～