составить программу которая покажет, существует ли треугольник с углами а, б и с.

program p1;var a,b,c:real;beginwriteln('Введите a');readln(a);writeln('Введите b');readln(b);writeln('Введите c');readln(c);if((a<(b+c))and(b<(a+c))and(c<(a+b))) then writeln('Треугольник существует') else writeln('Треугольник не существует');end.