почему не правильно?

Условие задачи скиньте уже в каком-нибудь виде

введите с клавиатуры три числа x,y,z. если числа равны, то увеличте их в три раза и выведите результат на экран.Если равны только два последние числа то замените все числа на противоположные и выведите результаты.

иначе все числа сделайте равными 222 и выведите результат

Изменил

спасибо

var x,y,z:real;begin  readln(X,Y,Z);  if((x=y) and (x=z) and (y=z) ) then   begin    x:=x*3;    y:=y*3;    z:=z*3;    write('X: ',x,' Y: ',y,' Z: ',z);   end else   if (y=z) then    begin      x:=x*(-1);      y:=y*(-1);      z:=z*(-1);      write('X: ',x,' Y: ',y,' Z: ',z);    end else    begin      x:=222;      y:=222;      z:=222;      write('X: ',x,' Y: ',y,' Z: ',z);    end;   readlnend.