Вывести на экран все трёхзначные числа первая и последняя цифра одинаковая (чтобы программа работала в паскале).
var i:integer;
Begin
for i := 10 to 99 do
writeln(10*i + i div 10);
End.