Создание магического квадрата, +2 задачи на составление ур-ия прямой Опции

[gooddron123]

1) Написать алгоритм создания магического квадрата любой размерности. (Магический квадрат: суммы элементов в каждом столбце равны сумме элементов в каждой строке равны сумме элементов на 2 больших диагоналях)
2) Дано 300 точек. Построить прямую (уравнение прямой), содержащую максимальное кол-во точек из этих 300.
(Примечание: в задаче необходимо использовать записи)
3)Дано 300 точек. Найти такую прямую (уравнение прямой) , чтобы разницы между суммой точек сверху и суммой точек снизу была минимальна.

[Altair]

2) Дано 300 точек. Построить прямую (уравнение прямой), содержащую максимальное кол-во точек из этих 300.
(Примечание: в задаче необходимо использовать записи)

Алгоритм такой:

создаешь тип:

Код

type
<индефикатор типа> = record x,y:<тип_координат> end;
var
<индефикатор_переменной>:array[1..300] of <индефикатор типа>

То есть массив записей - каждая запись содержит 2 поля - абсциссу и ординату точки. (если 3D то еще апликата)

ну а потом передираем пары точек:

Код

for i:=1 to n do for j:=1 to n do {...}

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