Real в Int

← →
Ekzot (2006-10-21 22:48) [0]

sabj

← →
Kolan © (2006-10-21 22:49) [1]

var I: Integer; R: Double begin I := Round(R); end;
:)

← →
Kolan © (2006-10-21 22:51) [2]

+ размышлять почему подчеркнул Double и курить справку по Real...

← →
@!!ex © (2006-10-21 23:06) [3]

Trunc - тоже не плохо.

← →
Gero © (2006-10-21 23:08) [4]

Sm ho tutkf

← →
unknown © (2006-10-21 23:23) [5]

> Gero © (21.10.06 23:08) [4]

В переводе на русский - Ыь рщ егела?
Так бы сразу и сказал :))

← →
Loginov Dmitry © (2006-10-21 23:32) [6]

Kolan © (21.10.06 22:51) [2]
размышлять почему подчеркнул Double

Где подчеркнул?

:))

← →
Gero © (2006-10-21 23:35) [7]

> [2] Kolan © (21.10.06 22:51)

Потому что в этой строке возникнет ошибка при компиляции :)

← →
Loginov Dmitry © (2006-10-21 23:52) [8]

Насчет [2] - ерунда это все. По умолчанию Real и Double - это одно и тоже, о чем и упомянуто в справке. Вместе с этим я НЕ рекомендую использовать Real в качестве эквивалента Double ХОТЯБЫ потому, что не везде имеется совместимость этих двух на первый взгляд эквивалентных типов.

← →
PZ (2006-10-22 07:48) [9]

> [3] @!!ex © (21.10.06 23:06)
> Trunc - тоже не плохо.

Наверно не очень хорошо:

R := 9.8;
I := Round(R) (= 10)
I := Trunc(R) (= 9)

← →
Ketmar © (2006-10-22 09:51) [10]

>[8] Loginov Dmitry(c) 21-Oct-2006, 23:52
>не везде имеется совместимость этих двух на
>первый взгляд эквивалентных типов.
примерчик можно?

← →
Kolan © (2006-10-22 09:52) [11]

Real -5.0 x 10^324 .. 1.7 x 10^308 15–16

Real48 -2.9 x 10^39 .. 1.7 x 10^38
Real48 Deprecated

А вот:
Double -5.0 x 10^324 .. 1.7 x 10^308

The generic type Real, in its current implementation, is equivalent to Double (which maps to System.Double on .NET).
Исобссно

Note: The six-byte Real48 type was called Real in earlier versions of Object Pascal. If you are recompiling code that uses the older, six-byte Real type in Delphi, you may want to change it to Real48. You can also use the {$REALCOMPATIBILITY ON} compiler directive to turn Real back into the six-byte type.

← →
Kolan © (2006-10-22 09:53) [12]

Те Loginov Dmitry прав, но так лучьше не делать... :)

← →
Ketmar © (2006-10-22 09:57) [13]

>[12] Kolan(c) 22-Oct-2006, 09:53
>Те Loginov Dmitry прав, но так лучьше не делать... :)
особенно прав в процитированном мной в [10]?

← →
Kolan © (2006-10-22 09:58) [14]

> особенно прав в процитированном мной

Наверно имелось в виду не во всех версиях Delphi

> PZ (22.10.06 07:48) [9]

1) В посте небыло ни слова о том что надо округлять.
2) Round через Trunc реализуется без проблем.
Trunc через Round - тоже. Но это уже извращение. :)

>[15] @!!ex(c) 22-Oct-2006, 10:01
>2) Round через Trunc реализуется без проблем.
>Trunc через Round - тоже. Но это уже извращение. :)
только вот round() работает на порядок быстрее. %-)

> Ketmar © (22.10.06 10:03) [16]

Порядка не заметил. Отличие примерно 15%.
Посмотрел код System.pas...
Мнение о Borlande слегка испортилось....

← →
PZ (2006-10-22 10:33) [18]

> [15] @!!ex © (22.10.06 10:01)

Ваш пост [3] @!!ex © (21.10.06 23:06)
Trunc - тоже не плохо. (выделено мною, PZ)
соотносится с постом [1] Kolan © (21.10.06 22:49).
Я в [9] PZ (22.10.06 07:48) хотел показать, что между Round и Trunc может быть существенная разница

>[17] @!!ex(c) 22-Oct-2006, 10:11
>Порядка не заметил.
это была гипербола, конечно. но разница весьма ощутимая. когда я писал изовоксельный движок (хихик %-), то на грабли со скоростью наступил с размаху. %-)

Ketmar © (22.10.06 9:51) [10]
примерчик можно?

Сегодня с примерчиками напряги. Как только столкнусь с подобной лажей - сообщу.

Real в Int Найти похожие ветки