|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
07.04.2010, 18:24
|
#1 |
|
Пользователь
Регистрация: 19.04.2009
Сообщений: 50
|
Округление до десятков Delphi
Подскажите пожалуйста, есть ли какая-нибудь стандартная функция в delphi округления числа до десятков(Например, число 213, а мне надо чтобы программа выдала 210) или такую функцию надо самому писать?
|
|
|
|
07.04.2010, 18:33
|
#2 |
|
Форумчанин
Регистрация: 16.02.2010
Сообщений: 316
|
Код:
|
|
|
|
|
07.04.2010, 20:53
|
#3 | |
|
Старожил
Регистрация: 26.04.2008
Сообщений: 2,645
|
Цитата:
RoundTo(число, 1) SimpleRoundTo(число, 1) Отличаются тем, что второй ввариант округляет в большую сторону, если последняя значимая цифра 5 и больше. Первый вариант чередует округление в зависимости от чётности впередистоящей цифры Добавлено uses math |
|
|
|
|
|
08.04.2010, 20:55
|
#4 |
|
Пользователь
Регистрация: 19.04.2009
Сообщений: 50
|
продолжаю тему округлений,можно ещё узнать как округлить 17850 до 18000?
|
|
|
|
|
08.04.2010, 21:29
|
#5 |
|
Старожил
Регистрация: 26.04.2008
Сообщений: 2,645
|
...
RoundTo(число, -2) до сотых RoundTo(число, -1) до десятых RoundTo(число, +1) до десятков RoundTo(число, +2) до сотен RoundTo(число, +3) до тысяч ... SimpleRoundTo аналогично |
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| программу,запрашивающая кол-во сотен, десятков и единиц вчисле и выводит его название | StillersMom | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 15.03.2010 00:26 |
| Округление с заданным числом знаков и точностью(Delphi) | Mixasik | Общие вопросы Delphi | 4 | 28.10.2009 09:21 |
| ОКРУГЛение | Андрей_Васильевич | Microsoft Office Excel | 5 | 19.10.2009 09:09 |
| дано трехзначное число.вывести число,полученное при перестановки цифр десятков и сотен исходдного числа. | Kenny_mackormik | Помощь студентам | 7 | 12.03.2009 15:18 |
| округление | Toxa | Общие вопросы Delphi | 4 | 15.01.2007 19:15 |
