pascal - Double型の変数をInteger型1に割り当てる方法は？

Question

Pascalを使用するScarDiviの変数にDoubleを割り当てたいと思います。 次に例を示します。Integer

program Test;       
var
  dou: Double;
  int: Integer; 
begin
  int := 1;
  dou := 2.5;

  dou := Trunc(dou);

  int := int + dou;
end.

コンソールは私にType mismatch。タイプの変数をタイプ1に割り当てる方法DoubleはInteger？