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

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
Треугольник существует