Типизированный файл, Задача Опции

[Lapp]

Хорошо, согласен
По-хорошему, надо исправить строчку.
Совсем правильную науку я тут разводить все же не стал бы, что-то вроде такого:

else if 0.0001>Abs(MaxRez-rez) then begin

- думаю, осмысленно.
Анютка, смысл в том, что если с этими числами (результатами) будут производиться какие-то действия (сложения, умножения..), то единица вполне может превратиться в 0.9999999 (количество девяток зависит от точности представления действительных чисел в машине). И хотя по смыслу они равны, строгое сравнение выдаст false.

Сообщение отредактировано: volvo - 5.11.2006 23:55

[Анютка]

А может вас не затруднит выложить здесь полностью рабочую версию с подпрограммой-процедурой этой программы?

[volvo]

Аппетит приходит во время еды, правда? Сначала:

Люди, пожалуйста, помогите решить задачу!

Ну, а теперь -

А может вас не затруднит выложить здесь полностью рабочую версию с подпрограммой-процедурой этой программы?

И это при всем том, что ты практически ничего не сделала сама (по крайней мере, мы этого не видели)... Это не называется "помочь", это называется "решить ЗА тебя"...

[Lapp]

Попробуй сама. Не получится - спрашивай снова.
Но - предметно.
Успехов!

[Анютка]

Задачу доделала сама и сдала на отлично
Огромное спасибо lapp(у), за помощь!