Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите число:');
Swap(s[1],s[s.Length]); Writeln('Результат: ',s);
end.
Пример
Введите число: 73028
Результат: 83027
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString('Введите число:');
Swap(s[1],s[s.Length]); Writeln('Результат: ',s);
end.
Пример
Введите число: 73028
Результат: 83027
Вас заинтересует
2 года назад
2 года назад
3 года назад
3 года назад
9 лет назад
10 лет назад
10 лет назад