function solve(N: longint; var forward, backward: array of char; M: longint; var observation: array of char): longint;
begin
    (* insert your code here *)
    solve := 42;
end;


const
    MAXN = 10000000;
var
    N, M, i : longint;
    forward, backward, observation : array[0..MAXN] of char;
    fr, fw: text;

begin
    assign(fr, 'input.txt');
    assign(fw, 'output.txt');
    reset(fr);
    rewrite(fw);
    readln(fr, N);
    readln(fr, forward);
    readln(fr, backward);
    readln(fr, M);
    readln(fr, observation);

    writeln(fw, solve(N, forward, backward, M, observation));
    close(fr);
    close(fw);
end.