
Τελικά ξανα έγραψα τον τρόπο που διάβαζε τους αριθμούς και όλα καλά.

το error πρεπει να προέρχεται από το "while not Eof(DataFile) do begin" αν κάποιος ενδιαφέρετε. (αν ειχα κάνει βλακεία μην με βρίσετε...

Επιστροφή στην ειδική αναζήτηση
Κώδικας: Επιλογή όλων
c:= 223/10000;
Assign(OutFile,'file.out');
Rewrite(OutFile);
Writeln(OutFile,c:1:3);
Close(OutFile);