Помогите!

Помогите написать программу на паскаль: равнобедренные ли треугольник
Я вроде как сделал, но ошибку выдает, исправьте, плиз:
Только пожалуйста, НЕ uses (мы это еще не проходили) !
Program treug;
Var
X,Y,Z:integer;
T:boolean;
Begin
T:=(Z=X)or(X=Y)or(Y=Z);
readln('Равнобедренный? ' ОШИБКА, T);
End.