Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];

Вниз

Округение real   Найти похожие ветки 

← →
Grinder   (2004-01-19 19:07) [0]

Мастера, не бейте :) Напомните как вывести число типа real с 2 мя знаками после запятой. Забыл. Как в паскале помню, а в делфях забыл :)

---

← →
Тимохов   (2004-01-19 19:09) [1]

Точно также как в паскале.

---

← →
YuRock   (2004-01-19 19:09) [2]

RoundTo(r, -2);

---

← →
Grinder   (2004-01-19 19:18) [3]

RoundTo это да. Но оно выводит полностью "хвост" всё равно. В паскале было a:0:2 и число округлялось без хвостов.

---

← →
Тимохов   (2004-01-19 19:20) [4]

Что такое хвост?
А вывести... блин, прочел "округлить"
format("%.2f", [x]);

---

← →
Тимохов   (2004-01-19 19:22) [5]

где x имеет тип число с плавающей точкой.

---

← →
Dred2k   (2004-01-19 21:41) [6]


function RoundFloatEx(AValue : Extended; ADigits : Integer): Extended;
begin
Result := StrToFloat(Format("%." + IntToStr(ADigits) + "f", [AValue]));
end;


Дальше выводишь.
Все равно - Format-ом. ;)

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.02.02;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.009 c