ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как округлить число?
5 сообщений из 5, страница 1 из 1
как округлить число?
    #32584899
Фотография kedzo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kedzo
Участник
Задача округлить число 32774.32258 например до 32800
или 2048.387097 до 2300

т.е. до сотни.

В целом задача такая - есть количество литров за месяц например 1 016 004 надо его разбросать по дням месяца по одинаковому количеству литров в день + в один из дней добрать оставшееся.

пока не могу придумать как это сделать. буду признателен за помощь.
...
Рейтинг: 0 / 0
01.07.2004, 12:21:13
| Ответить | Цитировать | Написать  
как округлить число?
    #32584918
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
round(a, -2)
...
Рейтинг: 0 / 0
01.07.2004, 12:25:34
| Ответить | Цитировать | Написать  
как округлить число?
    #32584941
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
если функции нет - 97

Код: plaintext
1.
2.
?(int( 32774 . 32258 / 100 + 0 . 5 ))* 100 
  32800
...
Рейтинг: 0 / 0
01.07.2004, 12:33:07
| Ответить | Цитировать | Написать  
как округлить число?
    #32585009
Birjan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Birjan
Участник
Есть вопросы по сути задачи. По каким дням распределять литры (выходные)? Когда это делать? В какой день дораспреспрелять остаток (в последний?)?
...
Рейтинг: 0 / 0
01.07.2004, 12:58:25
| Ответить | Цитировать | Написать  
как округлить число?
    #32585060
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
kedzoЗадача округлить число 32774.32258 например до 32800
или 2048.387097 до 2300

т.е. до сотни.

В целом задача такая - есть количество литров за месяц например 1 016 004 надо его разбросать по дням месяца по одинаковому количеству литров в день + в один из дней добрать оставшееся.

пока не могу придумать как это сделать. буду признателен за помощь.

я бы сделал так:
- делим объём на (N_дней_месяце-1)
- берём от частного целую часть - это суточная норма
- умножаем на (N_дней_месяце-1)
- разница произведения и обьёма даёт остаток - на последний день



Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Dim Vol As Double
Dim CtDay As Long
Dim Razday As Double
Dim Delta As Double
Dim MyTest As Double
CtDay =  31 
Vol =  1016004 
Razday = Int(Vol / (CtDay -  1 ))
Delta = Vol - (Razday * (CtDay -  1 ))
MyTest = Razday * (CtDay -  1 ) + Delta
Debug.Print Razday; Delta; MyTest
 '33866  24  1016004
...
Рейтинг: 0 / 0
01.07.2004, 13:11:12
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как округлить число?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1673490]:
 0ms
get settings:
 5ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 29ms
get topic data:
 7ms
get first new msg:
 4ms
get forum data:
 2ms
get page messages:
 28ms
get tp. blocked users:
 1ms
others: 180ms
total:  270ms
созд. / загр.: 270ms
x
x
Закрыть


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