Треугольник задан длинами сторон. Найти длины медиан - надо в Паскале

var a, b, c, ma, mb, mc: real; begin read(a); read(b); read(c); ma:=(sqrt(2*b*b+2*c*c-a*a))/2; mb:=(sqrt(2*a*a+2*c*c-b*b))/2; mc:=(sqrt(2*a*a+2*b*b-c*c))/2; writeln('Медиана к стороне a=', ma:17:2); writeln('Медиана к стороне b=', mb:17:2); writeln('Медиана к стороне с=', mс:17:2); end.