Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.07.18;
Скачать: CL | DM;

Вниз

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

 
PIF   (2005-06-29 17:59) [0]

Здравствуйте! Скажите пожалуйста, как округлить число до  заданного
количества значащих цифр после запятой, которое(т.е. число значащих цифр)задает пользователь.
Заранее благодарен!!!


 
Ega23 ©   (2005-06-29 18:21) [1]

Умножить на 10 в степени заданного количества значащих цифр после запятой, округлить до целого, разделить на 10 в степени заданного количества значащих цифр после запятой.

А вообще - RoundTo


 
TStas ©   (2005-06-29 19:07) [2]

function RoundToN(r:Real, n:Byte):real; //Знаков, сколько введется
var
  i:byte;
  m:Integer;
begin
m:=1;
for i:=1 to n do m:=10*m;
Resul:=m*r;
Result:=round(Result)/m;
end;


 
PIF   (2005-06-29 21:29) [3]

Спасибо за помощь!!!



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

Текущий архив: 2005.07.18;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
14-1119420925
Игорь Шевченко
2005-06-22 10:15
2005.07.18
11 вещей, которым вас забыли научить в школе.


9-1112352952
VolanD666
2005-04-01 14:55
2005.07.18
Проверка столкновений


14-1119580587
sybrex
2005-06-24 06:36
2005.07.18
сделать demo версию программы


11-1102698214
uuzh
2004-12-10 20:03
2005.07.18
2 ECM: Насколько реально перепилить KOLIB под Kylix3 ?


1-1119946584
rolex
2005-06-28 12:16
2005.07.18
Как сохранить/загрузить содержимое ListView в файл?