Ответ: var a,b,c,s: real;beginwriteln( ‘vvedite 3 chisla’);readln(a,b,c);s:= sqrt(p*(p-a)*(p-b)*(p-c));writeln(s);readlnend.