Помогите с задачей по информатике
Даны 3 отрезка a,b,c определить какой получится треугольник.
Паскаль. Sqr это возведение в квадрат, Sqrt это квадратный корень.
var a,b,c:real;
begin
read(a, b, c);
if ((a=sqrt(sqr(b)+sqr(c)))or(b=sqrt(sqr(a)+sqr(c)))or(c=sqrt(sqr(a)+sqr(b))))then
write(Это прямоугольный треугольник)
else
write(Это не прямоугольный треугольник)
end.
Оцени ответ
