Скачать: CL | DM;

Округение 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.982 c