Это ты то олимпиадник??? Скажи своему научнику, чтобы он тебя от***дил. Нельзя использовать Real!!! Будешь точнее изучать паскаль увидишь -время выполнения для real почти вдвое больше Extended и Double. Единственная операция быстрее -операция сравнения.
А по поводу писать неудобно - это для кого как привычнее. Конечно куда грамотнее сдулать задачу юнитами(так всегда надо делать когда работаешь с файлами) а потом пореопределить конструкторы и методы. Но это уже совсем другой вопрос.
Задача впринципе должна работать. Там еще замуты могут быть с режимами компилятора. Мот сегодня вечерком подправлю, если найду паскальчик.)