Написать програму в паскале.
1. Даны стороны треугольника а,в,с. Определить является ли это треугольником.
var a, b, c: integer;
begin
writeln('Введите стороны треугольника');
readln(a, b, c);
if (a+b<=c)or(b+c<=a)or(a+c<=b) then writeln('Не является')</p>
else writeln('Является');
end.