Известны длины сторон треугольника a,b,c. Напишите на языке Паскаль программу,…

program test; var a, b, c: integer; s, p: real; begin write ('Enter a: '); readln (a); write ('Enter b: '); readln (b); write ('Enter c: '); readln (c); p: =(a+b+c) /2; s: =sqrt (p*(p-a)*(p-b)*(p-c); writeln ('S=', s); readln; end.