// Szyfr przestawieniowy
// Data: 11.02.2011
// (C)2020 mgr Jerzy Wałaszek
//-----------------------------

program cifer;

var
  s : string;
  x : char;
  i : integer;

begin

  // odczytujemy tekst
  readln(s);

  // zamieniamy miejscami litery
  i := 1;
  while i < length(s) do
  begin
    x      := s[i];
    s[i]   := s[i+1];
    s[i+1] := x;
    inc(i, 2);
  end;

  // wyświetlamy wynik
  writeln(s);
 
end.

// Szyfr przestawieniowy
// Data: 11.02.2011
// (C)2020 mgr Jerzy Wałaszek
//-----------------------------

#include <iostream>
#include <string>

using namespace std;

int main()
{
  string s;
  unsigned i;

  // odczytujemy tekst
  getline(cin, s);

  // zamieniamy miejscami litery
  for(i = 0; i < s.length()-1; i+=2)
    swap(s[i], s[i+1]);

  // wyświetlamy wynik
  cout << s << endl;

  return 0;
}

' Szyfr przestawieniowy
' Data: 11.02.2011
' (C)2020 mgr Jerzy Wałaszek
'-----------------------------

Dim As String s, x
Dim As Integer i

' odczytujemy tekst
Line Input s

' zamieniamy miejscami litery
For i = 1 To Len(s)-1 Step 2
  x            = Mid(s, i, 1)
  Mid(s, i, 1)   = Mid(s, i+1, 1)
  Mid(s, i+1, 1) = x
Next

' wyświetlamy wynik
Print s

End

# Szyfr przestawieniowy
# Data: 27.03.2024
# (C)2024 mgr Jerzy Wałaszek
#---------------------------

# odczytujemy tekst
s = input()
# zamieniamy miejscami litery
for i in range(0, len(s)-1, 2):
    s = s[:i]+s[i+1]+s[i]+s[i+2:]
# wyświetlamy wynik
print(s)

// Szyfr przestawieniowy
// Data: 12.02.2011
// (C)2020 mgr Jerzy Wałaszek
//-----------------------------

program cifer;

var
  s : string;
  i, m, a, c, X0, p : integer;
  x : char;
  T : array of integer;

begin

  // odczytujemy klucz
  readln(X0);

  // odczytujemy tekst/szyfr
  readln(s);

  // definiujemy generator pseudolosowy
  m := 984;
  a := 493;
  c := 385;

  // jeśli klucz > 0, to szyfrujemy, 
  // inaczej rozszyfrowujemy
   if X0 > 0 then

    // przestawiamy znaki tekstu
    for i := 1 to length(s) do
    begin

      // wyznaczamy nową pozycję znaku
      X0 := (a*X0+c) mod m;
      p := 1+X0 mod length(s);

      // wymieniamy znaki
      x    := s[i];
      s[i] := s[p];
      s[p] := x;

    end
  else
  begin

    // odtwarzamy klucz
    X0 := -X0;

    // tworzymy tablicę dynamiczną na pozycje
    SetLength(T, length(s));

    // wyliczamy pozycje jak przy szyfrowaniu
    for i := 0 to length(s)-1 do
    begin
      X0   := (a*X0+c) mod m;
      T[i] := 1+X0 mod length(s);
    end;

    // wykorzystujemy pozycje od końca szyfru
    for i := length(s) downto 1 do
    begin
      p    := T[i-1];
      x    := s[i];
      s[i] := s[p];
      s[p] := x;
    end;

    // usuwamy tablicę dynamiczną
    SetLength(T, 0);

  end;

  // wypisujemy wynik
  writeln(s);

end.

// Szyfr przestawieniowy
// Data: 19.02.2011
// (C)2020 mgr Jerzy Wałaszek
//-----------------------------

#include <iostream>

using namespace std;

int main()
{
  string s;
  int i, m, a, c, X0, *T;

  // odczytujemy klucz
  cin >> X0;

  // odczytujemy tekst/szyfr
  cin.ignore(255, '\n');
  getline(cin, s);

  // definiujemy generator pseudolosowy
  m = 984;
  a = 493;
  c = 385;

  // jeśli klucz > 0, to szyfrujemy
  // inaczej rozszyfrowujemy
  if(X0 > 0)

    // przestawiamy znaki tekstu
    for(i = 0; i < (int)s.length(); i++)
    {
      // wyznaczamy nową pozycję znaku
      X0 = (a*X0+c)%m;

      // wymieniamy znaki
      swap(s[i], s[X0%s.length()]);
    }

  else
  {
    // odtwarzamy klucz
    X0 = -X0;

    // tworzymy tablicę dynamiczną na pozycje
    T = new int[s.length()];

    // wyliczamy pozycje jak przy szyfrowaniu
    for(i = 0; i < (int)s.length(); i++)
    {
      X0 = (a*X0+c)%m;
      T[i] = X0%s.length();
    }

    // wykorzystujemy pozycje od końca szyfru
    for(i = s.length()-1; i >= 0; i--)
    {
      swap(s[i], s[T[i]]);
    }

    // usuwamy tablicę dynamiczną
    delete [] T;
  }

  // wypisujemy wynik
  cout << s << endl;

  return 0;
}

' Szyfr przestawieniowy
' Data 19.02.2011
' (C)2020 mgr Jerzy Wałaszek
'-----------------------------

Dim As String s, x
Dim As Integer i, m, a, c, X0, p

' odczytujemy klucz
Input X0

' odczytujemy tekst/szyfr
Line Input s

' definiujemy generator pseudolosowy
m = 984
a = 493
c = 385

' jeśli klucz > 0, to szyfrujemy
' inaczej rozszyfrowujemy
If X0 > 0 Then

  ' przestawiamy znaki tekstu
  For i = 1 To Len(s)

    ' wyznaczamy nową pozycję znaku
    X0 = (a*X0+c) Mod m
    p = 1+X0 Mod Len(s)

    ' wymieniamy znaki
    x  = Mid(s, i, 1)
    Mid(s, i, 1) = Mid(s, p, 1)
    Mid(s, p, 1) = x

  Next
 
Else

  ' odtwarzamy klucz
  X0 = -X0

  ' tworzymy tablicę dynamiczną na pozycje
  Dim As Integer T(Len(s))

  ' wyliczamy pozycje jak przy szyfrowaniu
  For i = 1 To Len(s)
    X0 = (a*X0+c) Mod m
    T(i) = 1+X0 Mod Len(s)
  Next
 
  ' wykorzystujemy pozycje od końca szyfru
  For i = Len(s) To 1 Step -1
    p = T(i)
    x  = Mid(s, i, 1)
    Mid(s, i, 1) = Mid(s, p, 1)
    Mid(s, p, 1) = x
  Next

End If

' wypisujemy wynik
Print s

End

# Szyfr przestawieniowy
# Data: 28.02.2024
# (C)2024 mgr Jerzy Wałaszek
#-----------------------------

# odczytujemy klucz
x0 = int(input())
# odczytujemy tekst/szyfr
s = input()
# definiujemy generator pseudolosowy
m = 984
a = 493
c = 385
# jeśli klucz > 0, to szyfrujemy
# inaczej rozszyfrowujemy
if x0 > 0:
    # przestawiamy znaki tekstu
    for i in range(len(s)):
        # wyznaczamy nową pozycję znaku
        x0 = (a * x0 + c) % m
        # wymieniamy znaki
        s1 = s[i]
        j = x0 % len(s)
        s2 = s[j]
        s = s[:i]+s2+s[i+1:]
        s = s[:j]+s1+s[j+1:]
else:
    # odtwarzamy klucz
    x0 = -x0
    # tworzymy tablicę dynamiczną na pozycje
    t = []
    for i in range(len(s)):
        # wyliczamy pozycje jak przy szyfrowaniu
        x0 = (a * x0 + c) % m
        t.append(x0 % len(s))
    # wykorzystujemy pozycje od końca szyfru
    for i in reversed(range(len(s))):
        s1 = s[i]
        j = t[i]
        s2 = s[j]
        s = s[:i]+s2+s[i+1:]
        s = s[:j]+s1+s[j+1:]
    # usuwamy tablicę dynamiczną
    t = []
# wypisujemy wynik
print(s)
print()