Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 5 973

/ вопрос решён /

Здравствуйте!
Проблема:
Нужно подсчитать максимальное количество наложений разных отрезков на координатную ось на промежутке QS.
В системе координат выглядит это примерно так как нарисовано в приложении:
Пускай Q=0; S=100;
Здесь максимальное количество 4 так как накладывабтся отрезки ab, cd, xz, rt.

Приложение:
  1. Y
  2. | n----k
  3. |
  4. | x---------z
  5. |
  6. | e-----------------f
  7. |
  8. | c------------d
  9. r-|--------------------------------------------------------------------t
  10. | a------------------------------b
  11. |
  12. 0-----------------------------------------------------------------100>X


Кириченко Сергей Вопрос решён, но можно продолжить его обсуждение в мини-форуме

Вопрос задал: Кириченко Сергей (статус: 1-ый класс)
Вопрос отправлен: 2 марта 2012, 13:40
Состояние вопроса: решён, ответов: 1.

Ответ #1. Отвечает эксперт: DNK

Здравствуйте, Кириченко Сергей!

Дано: arr массив из (int начало, int конец) = {};

Количество = 0;
цикл int i от 0 до МаксЭлементМассива(arr)
цикл int j от 0 до МаксЭлементМассива(arr)
если i!=j и ([arr[i].начало..arr[i].конец] * [arr[j].начало..arr[j].конец] != []) то
Количество++;
Вывести(Количество);

Ответ отправил: DNK (статус: Студент)
Время отправки: 2 марта 2012, 14:07
Оценка за ответ: 5


Мини-форум вопроса

Всего сообщений: 5; последнее сообщение — 2 марта 2012, 15:24; участников в обсуждении: 3.
Кириченко Сергей

Кириченко Сергей (статус: 1-ый класс), 2 марта 2012, 14:57 [#1]:

не понятна эта конструкция:
[arr[i].начало..arr[i].конец] * [arr[j].начало..arr[j].конец]
DNK

DNK (статус: Студент), 2 марта 2012, 15:04 [#2]:

Умножение множеств.
В паскале не прокатит если значения больше 255
"Digital Networked Knight"
Кириченко Сергей

Кириченко Сергей (статус: 1-ый класс), 2 марта 2012, 15:19 [#3]:

Спасибо.
Ерёмин А.А.

Ерёмин А.А. (статус: *Администратор), 2 марта 2012, 15:19 [#4]:

Умножение множеств в математике называют пересечением — так автору вопроса будет понятнее :-)
Кириченко Сергей

Кириченко Сергей (статус: 1-ый класс), 2 марта 2012, 15:24 [#5]:

Как закрыть вопрос?

2 марта 2012, 15:28: Статус вопроса изменён на решённый (изменил автор вопроса — Кириченко Сергей)

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:40
Выполнено за 0.02 сек.