Используйте Files.File, на который навешивайте Stores.Writer/Reader - и используйте WriteReal/ReadReal:
## Код:
```
VAR f: Files.File;
       wr: Stores.Writer;
       res: INTEGER;
BEGIN
  f := Files.dir.New(Files.dir.This("SomeDirectory"), FALSE);
  wr.ConnectTo(f);
  FOR ... DO
    wr.WriteReal(x)
  END;
  f.Register("SomeFile", "dat", FALSE, res)
END
```
