Решите ничего не понимаю желательно с обьяснением

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 uses crt; var i,xa,ya,xb,yb,xc,yc: integer;   function Dlina(x1,y1,x2,y2: integer):real; var d: real; begin d:= sqrt(sqr(y1-y2)+sqr(x1-x2)); Dlina:=d; end;   function Perimetr(a,b,c: real): real; begin Perimetr:=a+b+c; end;   procedure Vvod (nt: byte; var ax,ay,bx,by,cx,cy: integer); begin writeln ('Координаты вершины A ',nt,' треугольника'); readln (ax,ay); writeln ('Координаты вершины B ',nt,' треугольника'); readln (bx,by); writeln ('Координаты вершины C ',nt,' треугольника'); readln (cx,cy); end;   begin for i:=1 to 3 do     begin     Vvod (i,xa,ya,xb,yb,xc,yc);     writeln ('Периметр ',i,' треугольника = ',Perimetr(Dlina(xa,ya,xb,yb),Dlina(xb,yb,xc,yc),Dlina(xc,yc,xa,ya)):0:2);     writeln;     end; readkey end.

Внешность

У фламинго тонкие длинные ноги, гибкая шея и оперенье, окраска которого варьирует от белого до красного цвета. Их особым отличительным признаком является массивный выгнутый вниз клюв, с которого они фильтруют пищу из воды или ила. В отличие от большинства других птиц, подвижной частью клюва у фламинго является не нижняя, а верхняя часть. Передние пальцы ноги соединены плавательной перепонкой. Розовую или красную окраску оперению фламинго придают красящие вещества липохромы, которые птицы получают вместе с пищей. При опасности они взлетают, и хищнику трудно выбрать из них определённую жертву, тем более что маховые перья на крыльях всегда чёрные, и при полёте они мешают сфокусироваться на жертве. В зоопарках фламинго не теряют свою уникальную окраску оперения, так как в пищу им добавляют различные содержащие каротин продукты: тёртая морковь, сладкий перец и, главное, мелких ракообразных.