Hlavne, že mi kompilátor vyhodil 5 chýb !!! To som s Tvojim výtvorom nič nerobil...
Checking project dependencies...
Compiling Project1.dproj (Debug configuration)
[DCC Error] Unit1.pas(116): E2032 For loop control variable must have ordinal type
[DCC Error] Unit1.pas(119): E2010 Incompatible types: 'Integer' and 'Double'
[DCC Error] Unit1.pas(125): E2029 ';' expected but '.' found
[DCC Error] Unit1.pas(127): E2029 Declaration expected but end of file found
[DCC Fatal Error] Project1.dpr(5): F2063 Could not compile used unit 'Unit1.pas'
Failed
Elapsed time: 00:00:00.5

Aký kompilátor používaš?