Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

известны длины сторон треугольника a,b,c. напишите на языке Паскаль программу, вычисляющую площадь этого треугольника. пример входных данных: а=3 b=4c=5. пример выходных данных S=6.0

Ответ оставил Гость

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.