Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Составить программу в Pascal.
В которую введя любое трехзначное число оно выводит число-перевертыш
(пример ввожу 122 и мне выводит 121 или 569 и и мне 565)

Ответ оставил Гость

Ну если надо поменять единицы на сотни, то может получиться так:

var
  a: integer;
begin
  readln(a);
  writeln((a div 10) * 10 + (a div 100)); 
end.