>>801
コードをぱっと見たときに、begin～end; では冗長すぎませんか？