PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
1. С циклом for
begin
var s:=ReadlnString;
for var i:=s.Length downto 1 do Write(s[i])
end.
Пример
Информатика
акитамрофнИ
2. Средствами PascalABC.NET
begin
ReadlnString.Inverse.Println
end.