Программа по информатике: периметр треугольника равен p одна сторона=a, другая…

program AAAvar p,a,b: real; c,s: real; begin readln (a,b); c: =p — a-b; {Третья сторона} s: =p/2 (p/2-a) (p/2-b) (p/2-c); {Площадь} writeln (c,',s) end. Я не знаю, что нужно, но вот нахождение третьей стороны и площади, надеюсь поможет