Составьте программу определяющую могут ли три числа a ,b,c является длинами сторон треугольника

var   a,b,c:real;   begin   Write('Введите через пробел длины трех сторон: ');   Readln(a,b,c);   if (a+b>c) and (a+c>b) and (b+c>a) then     Writeln('Можно составить треугольник')   else     Writeln('Нельзя составить треугольник') end. Тестовое решение: Введите через пробел длины трех сторон: 2 6 9 Нельзя составить треугольник Введите через пробел длины трех сторон: 3 4 5 Можно составить треугольник