後でpascalに書き直してくれるとありがたい…ダメですか。