Даны три натуральных числа. Напишите программу, определяющую, существует ли треугольник с такими длинами сторон. Если такой треугольник существует, то определите его тип(равносторонний, равнобедренный, разносторонний).
Язык,
Паскаль. спасибо
Var a, b, c: integer;begin readln(a, b, c); if (a + b <= c) or (b + c <= a) or (a + c <= b) then<br> writeln('Does not exist') else if(a = b)and(b = c) then writeln('Equilateral') else if(a = b)or(b = c)or(a = c) then writeln('Isosceles') else writeln('Versatile') end.