Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Деление с остачей [D7]

dest81 © (2005-08-25 11:55:00)
Как можно задать нужное количество знаков после запятой при делении с остачей?

kukuikar (2005-08-25 17:21:00) [1]
function FloatToStrF(Value: Extended; Format: TFloatFormat; Precision, Digits: Integer):

type TFloatFormat = (ffGeneral, ffExponent, ffFixed, ffNumber, ffCurrency);

Digitman (2005-08-25 17:10:00) [2]

> Leonid Troyanovsky © (25.08.05 16:56) [9]

чем же прокурор не к месту при "деляче"/"остаче" ?)

"Когда в товарищах согласья нет .." (с)

)

Anatoly Podgoretsky (2005-08-25 17:01:00) [3]
TUser © (25.08.05 16:51) [7]
Нет, но видел как делила 5 золотых.

Leonid Troyanovsky (2005-08-25 16:56:00) [4]

> Digitman © (25.08.05 16:24) [6]

> что такое "остача" - одному прокурору известно) ..
> кому как не прокурору "делить с остачей")
> уж прокурор-то знает как "знаки" (денежные ?) "делить с
> остачей") .. до или после того как он, прокурор, сподобится
> на "количество знаков" намекнуть просящему)

IMHO, некорректно для решения проблем с постановкой задачи,
сразу звать прокурора (свят-свят).

--
Regards, LVT.

Digitman (2005-08-25 16:55:00) [5]

> TUser © (25.08.05 16:51) [7]

да, видел) ... посчастливилось, знаете ли ..

только что-то не припомню, чтобы там та самая лиса "делячила" "делячу" на "разнячу" и "остачу"..

TUser (2005-08-25 16:51:00) [6]
> Digitman © (25.08.05 16:24) [6]

Детский мультик про то, как лиса сыр делила, видели? Вот это и есть - с остачей.

Digitman (2005-08-25 16:24:00) [7]

> с остачей

хм..

то ли с недостачей ..
то ли с недоимкой ..

что такое "остача" - одному прокурору известно) ..
кому как не прокурору "делить с остачей")
уж прокурор-то знает как "знаки" (денежные ?) "делить с остачей") .. до или после того как он, прокурор, сподобится на "количество знаков" намекнуть просящему)

Anatoly Podgoretsky (2005-08-25 14:43:00) [8]
Koala © (25.08.05 14:12) [4]
Любые функции ROUND это обман. Смотри [2]

Koala (2005-08-25 14:12:00) [9]
{**********************************************************
* Module: Global.Rounde
* Created by: Скопировано из RXLibrary
* Date Created: 02/08/2005
* Last Modified:
* Input: RoundValue - число, DP - сколько знаков после запятой)
* Output:
* Return:
* Description: Функция округления
**********************************************************}
function RoundeRX(RoundValue: Extended; DP : Integer) : Extended;
function Sign(Value: Extended): Integer;
begin
if Value = 0 then Result := 0 else
if Value < 0 then Result := -1 else Result := 1;
end;
begin
Result := Int(RoundValue*exp(DP*ln(10))+Sign(RoundValue)*0.50000001)*exp(-DP*ln(10));
end;

TUser (2005-08-25 12:26:00) [10]
Думаю, что имеется в виду Format/FormatFloat

Digitman (2005-08-25 12:15:00) [11]
никак.
количество значащих разрядов в дроб.части стр.представления числа определяется параметрами форматирования этого стр.представления, а не "при делении"

stone (2005-08-25 12:04:00) [12]
RoundTo + F1

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »