Нужна ! напишите программу в паскале, для построения прямоугольного треугольника с обозначением прямого угла, вершин, и подписать катеты и !

Program ZZZ;
uses graphabc;
begin
line (50,50,200,200);
lineto(200,50) ;
lineto (50,50) ;
textout(110,130,'c');
textout(120,30,'b');
textout(215,130,'a');
textout(30,30,'А');
textout(215,210,'В');
textout(215,30,'С');
line(180,50,180,70)   ;
lineto(200,70);
end.