在程序中，在表单form1上建立2个编辑框对象edit1、edit2和一个按钮对象。对form1的button1编写的代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
g:integer;
begin
g := strtoint(edit1.text);
if (g >=85) and (g <= 100) then
edit2.text :=”优秀”
else
if (g >=55) and (g < 85) then
edit2.text :=”通过”
else
if (g >0) and (g <55) then
edit2.text :=”重考”
else
edit2.text :=”输入有误”;
end;
阅读上面代码，当在edit1中输入 0 时， edit2的显示结果为 。

A、重考
B、优秀
C、输入有误
D、不通过

---