Question

Определить является ли треугольник прямоугольным , если известны три стороны.(с ветвлением)

Answer 1

a,b,c стороны
если a^2=b^2+c^2
то
прямоугольный
иначе
если b^2=a^2+c^2
то
прямоугольный
иначе
если c^2=a^2+b^2
то
прямоугольный
иначе
не прямоугольный

Answer 2

не знаю паскаля

Answer 3

var a,b,c:Integer; 
Begin   
Write('Введите длину 1 катета: '); Readln(a);   
Write('Введите длину 2 катета: '); Readln(b);   
 Write('Введите длину гипотенузы: '); Readln(c);   
 if ((a+b)>c) and ((a+c)>b) and ((b+c)>a) then        
 Begin            
 if (sqr(c)=sqr(a)+sqr(b)) then               
Writeln('Треугольник прямоугольный')         
  else               
Writeln('Треугольник другого типа');       
end   
else       
Writeln('Треугольник не существует');
END.

Answer 4

Осталось отформатировать

Answer 5

Не могу знать. Я уже сообщал рецепт всем по-моему: пользоваться Мозиллой.

Answer 6

Спасибо, не видел. Буду знать теперь