Графическая задача Опции

[Tribunal]

Задача такова:
Дан файл вещественных чисел,которые являются координатами точек.
Нужно найти такие 3 точки, что треугольник, построенный на этих точках
будет содержать максимальное количество точек множества.
Координаты этих трёх точек сохранить в файле, как результат
+нужна графическая иллюстрация к этой задаче.

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

Буду благодарна за помощь.

Сообщение отредактировано: Tribunal - 13.05.2006 19:02

[Tribunal]

я решила считывать координаты из файла в список.
вот,что получилось,но появляется ошибка: invalid numeric input

type
    t_ptr=^t_element;
    t_element=
      record
       infx:real;
       infy:real;
       next:t_ptr;
      end;

var
   f:text;
   x,y:real;
   i,n,k:byte;
   first,pos:t_ptr;
begin
assignfile(f,'position.txt');
readln(n);

reset(f);
repeat
  new(first);
  first^.next:=nil;
  readln(f,x,y);
  first^.infx:=x;
  first^.infy:=y;
  for i:=1 to n-1 do
   begin
     new(pos);
     readln(f,x,y);
     pos^.infx:=x;
     pos^.infy:=y;
     pos^.next:=nil;
     pos^.next:=first;
     first:=pos;
     inc(k);
   end;
until (eof(f)) or (k=n-1);
close(f);

в файле записаны вещ-ные числа таким образом:
40,5 8
26,4 5,099

[мисс_граффити]

может, я не права, но... не логичнее ли работать с типизированным, а не тестовым файлом?
имхо, "файл вещественных чисел"(по условию) - не text, а file of real.