Сообщение о том, что интересующая Вас книга находится на 5 полке, несет 3 бита информации. Сколько полок на книжном шкафу? По формуле N=2i вычисляем, что 8 полок. А если на самом деле полок в шкафу 7. Как вычислить, что полок 7?

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

begin
  var s:=ReadlnString;
  Writeln(s.Inverse)
end.

Пример
Я пишу программу на языке Паскаль
ьлаксаП екызя ан уммаргорп ушип Я

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

begin
  var s:=ReadlnString('Введите строку:');
  Write('Введите два символа СЛИТНО для сравнения их частоты: ');
  var ab:string;
  Readln(ab);
  var a:=ab[1];
  var b:=ab[2];
  var ka:=0;
  var kb:=0;
  for var i:=1 to s.Length do
    if s[i]=a then ka+=1
    else if s[i]=b then kb+=1;
  if ka>kb then Writeln('Символ ',a,' встречается чаще, чем ',b)
  else
    if ka<kb then Writeln('Символ ',a,' встречается реже, чем ',b)
    else
      if ka<>0 then Writeln('Символы ',a,' и ',b,' встречается одинаково')
      else Writeln('Символы ',a,' и ',b,' отсутствуют')
end.

Пример
Введите строку: а роза упала на лапу азора
Введите два символа СЛИТНО для сравнения их частоты: ао
Символ а встречается чаще, чем о

Эти две функции выполняют абсолютно разные функции.

Функцию input() мы используем для ввода строки с клавиатуры, по дефолту тип принимаемого объекта у нас будет - str.

Функция print() используется для вывода значений переменных/текста, да и в целом объектов. Функция выводит все элементы, разделяя их значением sep, и завершает вывод значением end. (sep/end мы можем задать вручную)

Еще можно сказать, что эти две функции можно использовать в комбинации друг с другом, например мы хотим спросить у пользователя имя, а затем вывести на экран: "Привет, [имя пользователя]!", можем использовать вот такой код:

print("Привет, "+input("Как тебя зовут? ")+"!")