Показать сообщение отдельно
  #6  
Старый 03.06.2013, 05:49
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,029
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Ну, берем то, что я написал (алгоритм).

Вот входной поток (часть):
8.096 1486.061
8.049 1486.051
8.164 1486.051
8.164 1486.051
8.456 1486.059
8.755 1486.065
8.755 1486.065
8.857 1486.067
8.918 1486.068

По алгоритму на первом шаге (чтение данных и раскладка по ячейкам) при твоем шаге 0.5 получится:
- в ячейке для 8.0-8.5: Count = 5, Sum = 7430.273
- в ячейке для 8.5-9.0: Count = 4, Sum = 5944.265

После деления (Sum/Count) получится:
8 1486,0546
8.5 1486,06625

Далее округляй по тем правилам, которые тебе нужны.
Пустые ячейки в начале пропускаются проверкой Count = 0.
Вычисдение номера ячейки по данным производится делением с округлением до целого (можно честно проверять, но так быстрее будет).
Ответить с цитированием