以下程序为什么编译成功但如果执行的话会触发EInOutError异常类的io错误103。
//delphi5下编译。Program delphicode;
{calculate diameter, circurnference and area of a circle}
uses
  SysUtils;const Pai = 3.14;var
radius : integer;
Diameter,Area :real;begin
  WriteLn('Enter radius of a circle:');  {whole number}
  ReadLn(Radius);
  Diameter := 2 * Radius;
  Area     := Pai * Radius * Radius;  WriteLn('Diameter of the circle is :',Diameter:12:5);
  WriteLn('circumference is :',2 * Pai * Radius:12:5);
  WriteLn('Area of the circle is:',Area:12:5);
end.

解决方案 »

  1.   

    很简单的,Delphi和Turbo Pascal不一样的
    改为
    Program delphicode;
    {calculate diameter, circurnference and area of a circle}
    {$APPTYPE console} //add!!声明是Win32Console的,可以兼容部分TP指令
    uses
      SysUtils;const Pai = 3.14;var
    radius : integer;
    Diameter,Area :real;begin
      WriteLn('Enter radius of a circle:');  {whole number}
      ReadLn(Radius);
      Diameter := 2 * Radius;
      Area     := Pai * Radius * Radius;  WriteLn('Diameter of the circle is :',Diameter:12:5);
      WriteLn('circumference is :',2 * Pai * Radius:12:5);
      WriteLn('Area of the circle is:',Area:12:5);
    end.
      

  2.   

    确实就是这样用DELPHI,关知道Pascal语法是不够的,因为它只面对过程,而非对象,还需要了解Object Pascal,有点类似C和C++的关系!
      

  3.   

    Delphi 是 Windows 下的 Pascal,处理机制和 Dos 是完全不同的。