Question

Запросить стороны треугольника и определить,является ли он разносторонним,равносторонним или равнобедренным. Учесть: третья сторона не должна превышать сумму двух других,иначе треугольник не существует. Задача на тему "Программирование ветвлений на Паскале".

Answer 1

var a,b,c: real;

begin

write('напишите 3 стороны треугольника(c>a+b)');

read(a,b,c);

if (a<>b) and (a<>c) and (b<>c) then write ('разносторонний');

if (a=b) and (a=c) and (b=c) then write ('равноносторонний');

if (a=b) and (b<>c) and (a<>c) then write ('равнобедренный');

end.