|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Неправильные операции с вещественными числами
Код:
procedure TForm1.FormCreate(Sender: TObject); var a, b, c: Extended; begin a := 212.53; b := 212.49; c := a - b; if c = 0.04 then ShowMessage(FloatToStr(c)) end; |