Треугольник со сторонами Даны длины 3-х отрезков. Из них можно составлять треугольники, соединяя отрезки концами. Нужно сказать, можно ли получить таким способом равносторонний, равнобедренный или разносторонний треугольники....
Треугольник со сторонами Даны длины 3-х отрезков. Из них можно составлять треугольники, соединяя отрезки концами. Нужно сказать, можно ли получить таким способом равносторонний, равнобедренный или разносторонний треугольники. Input Со стандартного устройства ввода вводится через пробел 3 целых положительных числа, не превосходящих 10000 – длины отрезков. Output Нужно выдать на стандартное устройство вывода одно из следующих сообщений: “Triangle is equilateral” – если треугольник равносторонний “Triangle is isosceles” – если треугольник равнобедренный “Triangle is scalene” – если треугольник разносторонний “Triangle is invalid” – если треугольника не существует Кавычки выводить не нужно. Sample Input 100 60 80 Sample Output Triangle is scalene
Ответ(ы) на вопрос:
uses crt;
var a,b,c:integer;
begin
read(a);
read(b);
read(c);
if ((a+b)>c) and ((a+c)>b) and ((b+c)>a) then
begin
if ((a=b) and (b<>c)) or ((a=c) and (c<>b)) or ((b=c) and (c<>a)) then writeln('Triangle is isosceles');
if (a=b) and (b=c) and (a=c) then writeln('Triangle is equilateral');
if (a<>b) and (a<>c) and (b<>c) then writeln ('Triangle is scalene');
end
else writeln('Triangle is invalid');
end.
Не нашли ответ?
Похожие вопросы