Дано двузначное число.выяснить одинаковые ли его цифры

var
n: integer;
degin
readln (n);
if n mod 10= n div 10 then
write ('Цифры одинаковые')
else
write ('Цифры неодинаковые'):
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.