Даны положительные действительные числа x,y,z. Выяснить существует ли треугольник с...

Question

Даны положительные действительные числа x,y,z. Выяснить существует ли треугольник с длинами сторон x,y,z.
Составьте, пожалуйста, программу в Паскаль

Answer 1

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (x,y,z):=ReadReal3('Введите через пробел три числа:');
  if (x+y>z) and (x+z>y) and (y+z>x) then Writeln('Треугольник существует')
  else Writeln('Треугольник не существует')
end.

Примеры
Введите через пробел три числа: 2.34 5.18 9
Треугольник не существует

Введите через пробел три числа: 3 4 5
Треугольник существует

Comments

Спасибо большое!