Напишите программу треугольник со сторонами, надо. даны длины 3-х отрезков. нужно сказать, можно ли, соединяя отрезки концами, получить равносторонний, равнобедренный или разносторонний треугольники. или неравенство треугольника нарушено и его составить нельзя? input со стандартного устройства ввода вводятся через пробел 3 целых положительных числа, не превосходящих 10000 – длины отрезков. output нужно выдать на стандартное устройство вывода одно из следующих сообщений: “triangle is equilateral” – если треугольник равносторонний, “triangle is isosceles” – если треугольник равнобедренный, “triangle is scalene” – если треугольник разносторонний, “triangle is invalid” – если треугольника не существует. кавычки выводить не нужно

197

497

Посмотреть ответы 2

Ответы на вопрос:

Диля222222222

Информатика

4,4(50 оценок)

Program triangle; var a,b,c: real; begin read (a,b,c); if (a+b> c)and(a+c> b)and(b+c> a) then if (a=b)and(b=c)and(a=c) then write ('triangle is scalene') else if (a=b)or(b=c)or(a=c) then write ('triangle is isosceles') else write ('triangle is equilateral') else write('triangle is invalid'); end.

Legendary13

Информатика

4,7(57 оценок)

Var a,b: integer; begin write('введите a='); read(a); write('введите b='); readln(b); if a< 0 then writeln('a=',sqr(a)) else writeln('a=',a); if b< 0 then writeln('b=',sqr(b)) else writeln('b=',b); end.