Найти площадь треугольника с помощью Pascal.

program Trykutnyk;uses Crt;const a=5; b=3.6; c=4.2;var p,s: real;begin          clrscr;          p:=a+b+c;          writeln('p=',  p:5:2);          p:=p/2;          s"=sqrt(p*(p-a)*(p-b)*(p-c));          writeln('s=',  s:5:2);          writeln('Имя Фамилия');          readlnend.