#include <stdio.h>
#define N 5

int main (){

    char A[N][N] = {
    {'a', 'f', 'k', 'p', 'w'},
    {'b', 'g', 'l', 'r', 'x'},
    {'c', 'h', 'm', 's', 'y'},
    {'d', 'i', 'n', 't', 'z'},
    {'e', 'j', 'o', 'u', ' '},
    };
    char *B[15];
    char *C[15];
    char p[15];
    int pom, pi, znak, i, j, k, m, licznik = 0;

    printf ("Autor programu: Mateusz Serwach\n\n");

    for (k = 0; k < 15; k++) { //przypisanie wartości NULL do elementów tablicy *B
        B[k] = NULL;
    }

    printf ("Prosze podac ciag znakow:\n\n");

    k = 0;
    scanf_s("%c", &p[0]);
    pi=0;
    while ( p[pi]!= '\n') { //wtedy bierze dwa razy ten sam znak
        for (i = 0; i < N; i++)
            {
            for (j = 0; j < N; j++)
             {
                if (p[pi] == A[i][j])
                {
                    B[k++] = &A[i][j];
                    licznik++;
                }
            }
        }
        pi++;
        scanf_s("%c", &p[pi]);

    }

    printf("\nOto przepisany...\n");

    for (i = 0; i < licznik; i++) { //przepisanie tekstu podanego przez użytkownika
        printf ("%c", *B[i]);
    }

    printf("\n\n");

    k = 0;

    for (i = 1; i < N; i++) {  //szyfrowanie
        k = i - 1;
        for (j = 0; j < N; j++) {
            pom = A[i][j];
            A[i][j] = A[k][j];
            A[k][j] = pom;
        }
    }

    printf ("\n...zaszyfrowany...\n");

    for (i = 0; i < licznik; i++) { //przepisanie tekstu podanego przez użytkownika
        printf ("%c", *B[i]);
    }

    k = 4;

    for (i = 4; i > 0; i--) { // odszyfrowanie
        k = i - 1;
        for (j = 0; j < N; j++) {
            pom = A[i][j];
            A[i][j] = A[k][j];
            A[k][j] = pom;
        }
    }

    printf ("\n\n...oraz odszyfrowany tekst podany przez uzytkownika.\n");

    for (i = 0; i < licznik; i++) { //przepisanie odszyfrowanego tekstu podanego przez użytkownika
        printf ("%c", *B[i]);
    }

    i = 0;

    for (m = 0; m < 15; m++) { //wypełnienie macierzy C NULLami
        C[i++] = NULL;
    }

    i = licznik - 1;

    for (m = 0; m < 15; m++) { //przypisanie do macierzy C adresów z macierzy B
        C[m] = B[i--];
    }

    printf ("\n\nWypisanie wedlug nowego porzadku:\n");

    for (m = 0; m < licznik; m++) {  //wypisanie według nowego porządku
        printf ("%c", *C[m]);
    }

    printf ("\n\nKoniec programu.\n");
    return 0;
}