循环中变量问题(10分)

优化一下HHXX的代码 //自认为
var
I: Integer;
begin
for i := 0 to 8 do
begin
if not Odd(i) then //Odd()应该是判断一个整数不是奇数
begin
showmessage(IntToStr(i));
continue;
end;
end;

接受答案了.