Question

Вывести на экран все трёхзначные числа первая и последняя цифра одинаковая (чтобы программа работала в паскале).

Answer 1

var i:integer;

Begin

  for i := 10 to 99 do

   writeln(10*i + i div 10);

End.