Обработка последовательности данных (in Delphi Or Pascal)

  • Автор темы Snuppy
  • Дата начала
S

Snuppy

#1
Вводиться последобательность целых чисел. Создать новую последовательность, которая содержит номера позиций, в которых начинаются подряд идущие значения в нисходящем порядке.

Пример:
Position:..0 1 2 3 4 5 6 7 8 9 10
Input:.......2 6 7 3 2 10 4 15 20 22 9
Output:....2 5 9
2 (1; 2);
5 (10; 4);
9 (22; 9).

Cпасибо !