vitaly_l писал(а):- Код: Выделить всё
s:string;
R,RR: Single;
I:Integer;
begin
R:=1;
RR := 0.1;
for I:=1 to 10 do R:=R-RR;
RR := 3;
RR := RR / R; // вместо того чтобы наорать на меня, мол на ноль делить нельзя, она во чего делает:
writestr(s,R:16:16);
writeln('R = ' +s);
writestr(s,RR:16:16);
writeln('RR = ' +s);
readln;
end.
Ну что тут поделать. Альтернативно одарённым компьютер лучше использовать для игр.
Альтернативно одарённые не хотят знать, что 0.1 в десятичной системе счисления не имеет точного представления в двоичной. Они хотят, чтобы было так, как они хотят.
Поэтому, зачем им изучать системы счисления и тонкости преобразований.
0.1 (двоичное) <> 0.1 (десятичное)
1.png
И, вместо того, чтобы осознав, что есть место тонкостям и нюансам, которые должно изучить, они, эти альтернативно одарённые, бегают и вопиют, обвиняя окружающих в чём угодно, кроме обвинения себя в безграмотности!
Демонстрируя окружающим свою глубокую альтернативность.
Добавлено спустя 6 минут 43 секунды:Хотя, если альтернативно одарённый воспылает овладеть основами работы с арифметикой с плавающей запятой, то вот ему в помощь -
дыдыщ!
У вас нет необходимых прав для просмотра вложений в этом сообщении.