Viết chương trình pascal tính chu vi và diện tích hình tam giác . GIÚP MÌNH VỚI Ạ

     Program Hotboy ;

     Uses crt;

     Var a,b,c,p,S: real;

     Begin

     clrscr;

     Write('Nhap canh a:');readln(a);

     Write('Nhap canh b:');readln(b);

     Write('Nhap canh c:');readln(c);

     p:=(a+b+c)/2;

     S:= sqrt(p*(p-a)*(p-b)*(p-c));

     Write('Dien tich hinh tam giac la',s:3:6);

     Write('chu vi cua hinh tam giac          la',a+b+c);

     Readln

     End.