Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.