Таня забыла пароль для запуска компьютера, но помнила алгоритм его получения из символов kbmam9kbk в строке подсказки. если все последовательности символов mam заменить на rp, а kbk - на 1212 ,а из получившейся строки удалить 3 последних символа, то полученная последовательность будет паролем. назовите пароль.

program xxx;

    var i, n : integer;

                a, d : real

                      s: array[1..20] of real;

begin

    write('введите n-');

    readln (n);

    write('введите а=');

    readln(a);

    write('введите d=');

    readln(d);

    s[1]: =a;

    for i: =2 to n do

        s[i]: =a+d;

    write('арифметическая прогрессия: ');  

    for i: =1 to n do

              write(s[i]);

end.

program vvl;

var x: integer;

      v: real;

begin

write('x=');

readln (x);

v: = abs(a)-2;

writeln ('v='; v: 2: 1);

end.