Даны стороны a,b и c. Если треугольник равносторонний, то ...

Настя

Ответ:
program samsdelal;

var

a,b,c: real;

begin

   readln(a);

   readln(b);

   readln(c);

   if (a=b)and(b=c) then writeln('Треугольник равносторонний')

   else  
   if (a=b)and(bc) then writeln('Высота равна: ', sqrt(b*b-0.25*c*c));

   if (c=b)and(ba) then writeln('Высота равна: ', sqrt(b*b-0.25*a*a));

   if (a=c)and(cb) then writeln('Высота равна: ', sqrt(a*a-0.25*b*b));

end.

   
Объяснение: