Помогите с задачей по информатике
Даны 3 отрезка a,b,c определить какой получится треугольник.
Ответы на вопрос
Ответил Астрa
0
Паскаль. 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.
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.
Новые вопросы