Вывести только одно из чисел X, Y, Z меньше 20 — Pascal(Паскаль)

var x, y, z: real;
 begin
 readln (x);
 readln (y);
 readln (z);
 if ((x<20)and(y>20)and(z>20)) or((x>20)and(y<20)and(z>20)) or ((x>20)and(y>20)and(z<20))  then
 writeln (true) else
 writeln (false);
 end.