Графика, Заливка треугольника одним цветом Опции

[Pautina]

Помогите, пожалуйста, с решением данной задачи!
рис1

Из рисунка1 следует, что изображение треугольника на экране – это набор горизонтальных отрезков оси абсцисс, при чем каждой строке экрана соответствует один отрезок, проведенный между точками пересечения отрезков со сторонами треугольника AB и AC, затем BC и AC.
Составим математическую модель. Координаты точек пересечения отрезков со сторонами треугольника будут рассчитываться по следующим формулам:

X = Ax + (Bx – Ax) / (By – Ay) * (By – Ay)
X2 (1) = Ay + (Sy – Ay) / (Bx – Ax) / (By – Ay)
X1 = Ax + (Sy – Ay) * (Cx – Ax) / (By – Ay)
X2 (2) = Bx + (Sy – By) * (Cx – Bx) / (Cy – By)

Далее приведем словесное описание алгоритма будущей программы.
рис2

После проведения сортировки координат вершин данного треугольника необходимо организовать цикл, обеспечивающий рисование линий для ординаты Y, которая изменяется от Ymin до Ymax. В теле цикла необходимо определить координаты точек X1 и X2 и затем провести между ними линию заданного цвета.

Сообщение отредактировано: Pautina - 14.09.2007 15:15

[Pautina]

Lapp, спасибо огромное за помощь. Скажи, а как мне после нахождения вершины с минимальным y

a1:=random(640);
b1:=random(480);
a2:=random(640);
b2:=random(480);
a3:=random(640);
b3:=random(480);
PutPixel(a1,b1,4);
PutPixel(a2,b2,4);
PutPixel(a3,b3,4);

if (b1>b2) and (b1>b3) then A:=b1 else
                       begin
                       if (b2>b1) and (b2>b3) then A:=b2 else A:=b3;
                       end;

упорядочить остальные вершины по x?