powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / округление числа до ближайшего кратного 5 копейкам
6 сообщений из 6, страница 1 из 1
округление числа до ближайшего кратного 5 копейкам
    #40006376
GrigoriyFomin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго дня, подскажите гуманитарию - все суммы при оплате надо округлять к ближайшему большему числу, кратному 5 копейкам. Например, итоговая сумма получилась 1,52 , а надо к оплате вывести 1,55 ну и тому подобное. Знаю, что решение простое и элементарное, но что-то туплю...
...
Рейтинг: 0 / 0
округление числа до ближайшего кратного 5 копейкам
    #40006384
Alexander A. Sak
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Умножить на 20, округлить до целого вверх, поделить на 20.
...
Рейтинг: 0 / 0
округление числа до ближайшего кратного 5 копейкам
    #40006390
GrigoriyFomin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Alexander A. Sak,

ой, точно, во времена работы с микроконтроллерами так и округлял на целочисленной математике :)
...
Рейтинг: 0 / 0
округление числа до ближайшего кратного 5 копейкам
    #40006393
YuRock
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GrigoriyFomin
Доброго дня, подскажите гуманитарию - все суммы при оплате надо округлять к ближайшему большему числу, кратному 5 копейкам. Например, итоговая сумма получилась 1,52 , а надо к оплате вывести 1,55 ну и тому подобное. Знаю, что решение простое и элементарное, но что-то туплю...
Любое округление к N копейкам в бОльшую сторону делается так:
сумма + ( N - ( Round( сумма * 100 ) mod N ) ) ) / 100
...
Рейтинг: 0 / 0
округление числа до ближайшего кратного 5 копейкам
    #40006413
НеофитSQL
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
YuRock
Любое округление к N копейкам в бОльшую сторону делается так:
сумма + ( N - ( Round( сумма * 100 ) mod N ) ) ) / 100


Что-то длинно. Или это потому что сумма в рублях? Нет ли способа проще?

(Floor((100сумма-1)/N)*N+N)/100? нет, в рублях проще не получается.
...
Рейтинг: 0 / 0
округление числа до ближайшего кратного 5 копейкам
    #40006482
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
GrigoriyFomin
ой, точно, во времена работы с микроконтроллерами так и округлял на целочисленной математике :)

Суровые раньше гуманитарии были...
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / округление числа до ближайшего кратного 5 копейкам
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]