Ввести пятизначное число а. Поменять крайние числа местами. ** языке Паскаль

Question

Ввести пятизначное число а. Поменять крайние числа местами.
На языке Паскаль

Answer 1

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('Введите число:');
  Swap(s[1],s[s.Length]); Writeln('Результат: ',s);
end.

Пример
Введите число: 73028
Результат: 83027