1. В Дельфи тип Real оставлен для совместимости, рекомендуется использовать Single.
2. Abs - возвращает абсолютное значение от числа.
3. Цикл от 0 до 4 равен 5 "шагам" + получение первого делителя (S := Value / 2). Попытка for I:=0 to 6 do ни к чему хорошему не приведёт, так получится 7 "шагов".
|