Elaboraţi o procedură ce calculează aria unui triunghi după formula lui Herones.
Присоединяйтесь — мы покажем вам много интересного
Присоединяйтесь к ОК, чтобы подписаться на группу и комментировать публикации.
Комментарии 3
begin
var p, s: real;
p := (a + b + c) / 2;
s := sqrt(p * (p - a) * (p - b) * (p - c));
writeln('Aria = ', s);
end;