Даны числа X и Y. Вычислите число z=x+y, если x<=y и 1-x+y в противном случае.

//Pascalvar   X, Y, z: real;beginwrite('X = ');readln(X);write('Y = ');readln(Y);if x <= y then  z := x + yelse  z := 1 - x + y;writeln('z = ', z);end.