Округление реальных типов
Если вам необходимо округлить число, то наиболее общее решение выглядит следующим образом:
function RoundFloat(R: Extended; Decimals: Integer): Extended;
var
Factor: Extended;
begin
Factor := Int(Exp(Decimals * Ln(10)));
Result := Round(Factor * R) / Factor;
end;
|
|
|
|
|
Низкие Цены: Kermi, Korado - kermi конвекторы. Siemens Standart 2NC5 102 4LS. . У нас дешевые туры в Турцию. Отдых в турции или туры в турцию, дешево. . документальное оформление требований Заказчика в виде ТЗ . снять жилье . |
