Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
учи учи учи учи учи учи учи учи
var a,b,c,s,p: real;
begin
read(a,b,c);
p: =(a+b+c)/2;
s: =sqrt(p*(p-a)*(p-b)*(p-c));
write(s: 0: 2);
end.
вроде так
100*1000000/8=12500000 байт в секунду
Популярные вопросы