Program Boolean33;
Var
a,b,c:Integer;
Begin
ReadLn(a,b,c);
WriteLn((a < b + c) And (b < a + c) And (c < a + b));
end.
Похожие записи/страницы:
- Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равнобедренным» - Pascal(Паскаль)
- Проверить истинность высказывания: «Треугольник со сторонами a, b, c является прямоугольным» - Pascal(Паскаль)
- Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равносторонним» - Pascal(Паскаль)
- Даны три положительных числа. Определить, можно ли построить треугольник с длинами сторон, равным этим числам.…
- Даны координаты поля шахматной доски x, y (целые числа, лежащие в диапазоне 1–8). Учитывая, что левое нижнее…
- Написать программу определения существования треугольника со сторонами а, b и с- Pascal(Паскаль)
- Определить, существует ли треугольник с заданными длинами сторон x, y, z Pascal(Паскаль)
- С помощью клавиатуры вводится 3 числа : a , b ,c . Если существует треугольник с такими сторонами ,то определить…