Сравнение чисел типа real

[googl]

Есть 2 переменные типа реал. есть такое сравнение
if (nasbaz-asmin)<0 then
nasbaz:=asmin;
НО! Оно не проходит, т.е. если nasbaz=0,345, а asmin=1, на выходе получаем 0,345 . В чем может быть причина?

[Пепел Феникса]

есть функция min из модуля math.

ShowMessage(FloatToStr(nasbaz-asmin));

смотрите итог.

[Аватар]

НО! Оно не проходит, т.е. если nasbaz=0,345, а asmin=1, на выходе получаем 0,345

Не понял прикола. Где то не то вы сделали

[googl]

Ну итог один и тот же. в чем проблема-то? а насчет min и max хорошее решение?

[googl]

Сообщение от Аватар

Не понял прикола. Вы получили то что хотели

Нет. Если nasbaz<asmin то nasbaz=asmin это по условию. а в итоге минимальное число проходит.

[Пепел Феникса]

точнее вам нужна max.
решение хорошее, лучше вечных if'ов.

[googl]

Сообщение от Пепел Феникса

точнее вам нужна max.
решение хорошее, лучше вечных if'ов.

мне ифы по-любому нужны, так как это проверка условия

[Пепел Феникса]

такие проверки лучше заменить именно функцией max/min.

[googl]

Сообщение от Пепел Феникса

такие проверки лучше заменить именно функцией max/min.

if nbbaz=max(nbbaz,bmax) then
nbbaz:=bmax;

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

[Пепел Феникса]

nbbaz:=max(nbbaz,bmax);

и все.