integer

Question

var
  a:integer;
begin
  a:=a/49;
提示：[Error] Fpremanage.pas(227): Incompatible types: 'Integer' and 'Extended'
请问如何修改？谢谢

Answer 1

a:=a div 49;  // 整除

Answer 2

a:=Round(a/49) or a:=Reunc(a/49)

Answer 3

Operator Operation  Operand types Result type Example
+ addition          integer, real integer, real X + Y
?        subtraction integer, real integer, real Result - 1
* multiplication integer, real integer, real P * InterestRate
/ real division integer, real real          X / 2
div integer division integer          integer          Total div UnitSize
mod remainder          integer                   integer          Y mod 6