双精度浮点数用pascal怎么保留

在PASCAL中设置一个变量为双精度数： var x:double;