Александр Скуснов

Это называется кластеризация. Вам надо разбить данные на 3 кластера. Метод ближайших соседей, упомянутый выше, подходит.

Все-таки все эти методы кластеризации разработаны для более общего случая. А у вас тут данные одномерные и численные уже - так что все совсем просто.

Во-первых, данные надо отсортировать, если уже не. А дальше у вас тут 2 переменные - (i,j) - первый и последний элемент в средней группе.i>0,j<n-1.

Можно эти индексы тупо перебрать двумя вложенными циклами. А дальше надо считать какую-то целевую функцию - насколько хорошо кластеры выбраны и брать лучшее значение. Надо, чтобы внутри различие было поменьше, а между кластерами - побольше. Можно брать максимум разности в каждом кластере и делить на разницу между двума кластерами. Вот минимизируйте эту функцию.

Но вообще можно, наверно, просто взять 2 максимальных промежутка между соседними числами и по ним разделить. В примере выше этот метод отлично разбивает на 3 группы: 1-103, 999-1001, 9000-9500

Если разность между маленькими числами важнее разности между большими, то возьмите сначала логарифм от всех чисел и уже это разбивайте на группы.

что возвращается в качестве ответа

Сообщения формата NMEA.

Вроде все сообщения из твоего ответа по ссылочке описаны. В частности
$GPGLL,5547.75949,N,03747.58257,E,155030.00,A,A*64
55°47.75949' северной широты, 37°47.58257' восточной долготы, зафиксировано в 15:50:30.00.

Этот цикл всегда срабатывает один раз. Остальные итерации зависят от условия.

Вот ссыока на историю...

Не будь идиотом - не читай всякое дерьмо!

Мной уже прочитан учебник А. А. Зубарев...

Уже гораздо лучше! Только что значит "прочитан"? Прочитан и всё? Сколько и каких программ написано? Сколько и каких устройств на AVR сделано?

Приведенный код не понятно для чего, а подсчитать строки можно так (если их не много)

var LinesCount: Integer;
var List: TStringList;
try
  List.LoadFromFile('filename.txt');
  LinesCount := List.Count;
finally
  List.Free;
end;
writeln(LinesCount);

или так

writeln(Length(TFile.ReadAllLines('filename.txt')))

или так (можно для большого файла, если длина одной строки не огромная)

var LinesCount := 0;
with TFile.OpenText('filename.text') do
try
  while not EndOfStream do begin ReadLine; Inc(LinesCount); end;
finally
  Free;
end;
Writeln(LinesCount);

Техническое задание.

Параметры -> IntelliSense -> Предложения C#

Нет. r1.GetLength судя по коду возвращает количество строк и столбцов.