Есть ошибка как исправитьПрограма турбо паскаль

X:=true - ошибка, т. к. х-real вместо этого x:= y, наверное и перед else

if (x>y) or (x>0) then

begin

end

else

. . . .