Робота з комп'ютерною графікою — один з найпоширеніших напрямків використання персонального комп'ютера, до того ж виконують цю роботу не тільки професійні художники і дизайнери. На будь-яких підприємствах іноді виникає необхідність подачі рекламних оголошень в газетах і журналах або просто у випуску рекламної листівки або буклету.
Без комп'ютерної графіки не обходиться жодна сучасна мультимедійна програма. Робота над графікою становить до 90 % робочого часу програмістських колективів, які випускають програми масового використання.
Розрізняють 3 види комп'ютерної графіки. Це растрова графіка, векторна графіка і фрактальна графіка. Вони відрізняються принципами формування зображення при відображенні на екрані монітора або у разі друку на папері.
Program lol;
Var
x : array[1..3] of real;
y : array[1..3] of real;
a,b,c,p,s : real;
begin
write('Введите координаты точки А: ');
readln(x[1],y[1]);
write('Введите координаты точки B: ');
readln(x[2],y[2]);
write('Введите координаты точки C: ');
readln(x[3],y[3]);
a := sqrt((x[1]-x[2])**2 + (y[1]-y[2])**2);
b := sqrt((x[1]-x[3])**2 + (y[1]-y[3])**2);
c := sqrt((x[2]-x[3])**2 + (y[2]-y[3])**2);
p := (a + b + c) / 2;
s := sqrt(p * (p-a) * (p-b) * (p-c));
writeln('Площадь тр-ка S = ', s);
end.
Результат: