Программа в паскаль. если знаете как решить хоть одно- напишите

begin

 var N: word;

 write('Введите число: '); read(N);

 var S:=N.ToString;

 //2.1

 writeln('Является ли число "перевёртышем?": ',(S=S.Inverse)? 'да':'нет');

 //2.2

 write('Есть ли одинаковые цифры: ',((S[1]=S[2]) or (S[2]=S[3]) or (S[1]=S[3]))? 'да':'нет');

end.

Примечание:

Так и не смог понять, где тут надо было использовать деление числа