Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Даны три отрезка a,b,c. Являются ли они сторонами треугольника? Написать программу для проверки

Ответ оставил Гость

Var a,b,c:real;
begin
write(a=);readln(a);
write(b=); readln(b);
write(c=); readln(c);
if (a+b>c)and(a+c>b)and(b+c>a)
 then writeln(Введенные числа являются сторонами треугольника)
 else writeln(Введенные числа не являются сторонами треугольника);
end.