procedure Display();
var i:integer;m:double;
begin
  for i:=1 to 19 do
    begin
      m:=0;
      m:=b[i]/inte;
      m:=m*100;
      edit1.text:=inttostr(round(m));
    end;
end;
b[i]是一个数组已定主义,可为什么在运行时总是提示‘floating pointion overfollew'大概是浮点溢出的意思吧?为什么呢?