В паскале: среди трёхзначных чисел, найти такие, которые будут палиндромами.

Для того, чтобы число было палиндромом, достаточно, чтобы не зависимо от способа его прочтения значение его было одинаковым.

Для трехзначных чисел достаточно будет лишь сравнить первую и третью цифры. А то, что стоит в середине не играет роли.

Значит нам нужны будут две переменные: одна для записи первой цифры, вторая для записи третьей цифры.

var chisl, first, third : integer;

first : = chisl div 100;

third : = chisl mod 10;

Добавим условие на равенство этих переменных:

if (first = third) then

writeln ('Число является палиндромом');