Даны действительные числа a, b, c. Выяснить существует ли треугольник с длинами сторон a,...

Question

Даны действительные числа a, b, c. Выяснить существует ли треугольник с длинами сторон a, b, c.

Answer 1

Var a,b,c:integer;
begin
writeln('a=');
readln(a);
writeln('b=');
readln(b);
writeln('c=');
readln(c);
if  (a+b>c) and (b+c>a) and (c+a>b) then writeln('treugolinik  suscestvuet') else writeln ('treugolinik ne suscestvurt');
readln;
end.