type
Double = Real;
Double is a synonym for the Real data type and supported for compatibility with other compilers.
Double is a Borland Pascal extension.
program DoubleDemo;
var
A: Double; { There is nothing special with `Double'. }
B: Real;
begin
A := Pi;
A := B
end.