Программа в freepfscal нахождение площади треугольника, половина есть, что дальше? program dana; uses srt var a, b, c, p, s: real begin p: =(a+b+c)/2 s: =sqrt(p*(p-a)*(p-b)*(p-c))

fara2003onozog7w fara2003onozog7w    3   10.07.2019 05:10    0

Ответы
NargizzaErbolat NargizzaErbolat  17.09.2020 10:22
Var a, b, c, P, S: real;
begin
readln(a);
readln(b);
readln(c);
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика