var
  a : Integer;
  b : Inetger;
  C : Integer;begin
  b := 100;
  c := 8;
  a := b / c;
end;运行时报错:[Error] Unit1.pas(33):Incompatible types:'Integer'and'Extended'目的:想要得到b/c的结果,带小数。应该怎么写?
谢谢

解决方案 »

  1.   

    var
      a : double;
      b : Inetger;
      C : Integer;begin
      b := 100;
      c := 8;
      a := b / c;
    end;
      

  2.   

    var
      a : float;
      b : Inetger;
      C : Integer;begin
      b := 100;
      c := 8;
      a := b / c;
    end; 
      

  3.   

    var 
      a : Extended; 
      b : Inetger; 
      C : Integer; begin 
      b := 100; 
      c := 8; 
      a := b / c; 
    end; 
      

  4.   

    var 
      a : double; 
      b : Inetger; 
      C : integer; begin 
      b := 100; 
      c := 8; 
      a := b / c; 
    end; 
      

  5.   

    var  
      a : real;  
      b : Inetger;  
      C : integer;  begin  
      b := 100;  
      c := 8;  
      a := b / c;  
    end;