Неразрешимая для меня проблема

← →
Алексей (2005-05-19 10:50) [0]

Ребята подскажите как это сделать(сам я в Delphi новичок):
Такая проблема:
имеется три поля ввода:
в первом поле вводится начало участка(в метрах)
во втором поле вводится конец участка(в метрах)
в третьем поле вводится коэффициент этого участка(число)
Например:
от 0 до 500м - 1 участок с коэффициентом 1,5
от 500 до 1000м - 2 участок с коэффициентом 1,2
от 250 до 750м - 3 участок с коэффициентом 2,0
Нужно чтобы все эти введенные числа(0,500,250,1000,750) отсортировались в возрастающем порядке и на пересечении участков
перемножились соответствующие этим участкам коэффициенты:
от 0 до 500 - 1,5
от 250 до 750 - 2,0
от 500 до 1000 - 1,2
Т.е. от 250 до 500, нужно чтобы перемножились 1,5*2,0;
от 500 до 750, нужно чтобы перемножились 2,0*1,2;
и так далее.
После этого все эти перемноженные числа должны выводится на экран. Количество этих участков неограничено.
Заранее благодарен всем кто поможет.

← →
denisww © (2005-05-19 11:06) [1]

вот так и делай примерно

← →
Digitman © (2005-05-19 11:26) [2]

начало и конец участка задается искл-но целочисленными значениями ?

← →
Palladin © (2005-05-19 11:38) [3]

> Алексей (19.05.05 10:50)

Ну может опишешь проблему?

← →
Алексей (2005-05-19 13:18) [4]

ответ Digitman"у
Да, начало и конец участка - это целые числа

2[4] Алексей (19.05.05 13:18)
Бежишь в цикле по набору данных и сравниваешь старое новое значение. Только тут у тебя здоровые траблы скрыты. Что будет если пересекаются ( а может и перекрываются) не 2 а больше участков? Очень легко может получиться такое.

Неразрешимая для меня проблема Найти похожие ветки