Напишите программу ввода трёх произвольных чисел X, Y и Z с клавиатуры. Если X больше Z, то вывести на экран сумму X и Y, иначе вывести на экран значение Z.
Помогите пожалуйста!

Var   X,Y,Z:real;BeginWrite('X = ');ReadLn(X);Write('Y = ');ReadLn(Y);Write('Z = ');ReadLn(Z);if X > Z then WriteLn(X+Y)else WriteLn()End.