
Neme
5 год назад
Пожалуйста посчитайте плиз решить програму в паскале. очень нужно даю 10 Поинтов

ОТВЕТЫ

Georgi
Oct 24, 2020
begin
var a:=ReadReal('a=');
var b:=ReadReal('b=');
var c:=ReadReal('c=');
var p:=(a+b+c)/2;
var s:=Sqrt(p*(p-a)*(p-b)*(p-c));
Writeln('s=',s:0:1)
end.
989
Смежные вопросы: