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

Вопрос пользователя:

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

Илюха отвечает:

var i:integer;

Begin

  for i := 10 to 99 do

   writeln(10*i + i div 10);

End.

Добавить свой ответ