Привет всем. Delphi. Для развлечения. Что будет напечатано на экране? 😁 program

Question

test;

var
D: Double;
begin
D := 0.1;
if D = 0.1 then
Writeln('0.1')
else
Writeln('not 0.1');
Readln;
end.

0

18.04.2022

20 просмотров

еще для развлечения можно попробовать на разных платформах )

0

18.04.2022

?? емнип конвертится в extended отсюда погрешности

0

18.04.2022

Ага. В fpc и на win32 и на win64 условие выполняется.

0

18.04.2022

значит надо репортить, на 32 недолжно

0

18.04.2022

Vadim Pavlov · Accepted Answer

Возможно else, т.к. double храниться с потерей точности.

0

18.04.2022