С клавиатуры вводятся три числа x,y,z. Выведите на экран те из них, которые меньше 31 и больше 23.

//Pascalvar x, y, z: integer;beginwrite('Введите x, y, z: '); readln(x, y, z);if ((x < 31) and (x > 23)) then  write(x, ' ');if ((y < 31) and (y > 23)) then  write(y, ' ');if ((z < 31) and (z > 23)) then  write(z, ' ');end.