Определение параллелограмма с наибольшей площадью. Delphi.

[Absentik]

Здравствуйте.

Задача:

На плоскости задано N параллелограммов координатами своих вершин x[i], y[i]. Определить номер параллелограмма, у которого площадь максимальна.

В Edit1 вводится количество параллелограммов на плоскости.
В Edit2 и Edit3 координаты первой вершины параллелограмма.
В Edit4 и Edit5 координаты второй вершины параллелограмма.
В Edit6 и Edit7 координаты третьей вершины параллелограмма.
Координаты четвертой вершины высчитываются автоматически и вписываются в Edit8 и Edit9.

По нажатию на кнопку запуск определяется площадь этого параллелограмма и заносится в массив a[i]. Если номер параллелограмма меньше N, то переходим к следующиму паралллограмму и т.д., если нет - находим максимальный элемент массива a[i] и выводим его номер в ShowMassage.

Собственно нужна помощь в определении площади параллелограмма и в заполнении Edit8 и Edit9.