Прочитай и выполни задание. Испольнитель Шифровальщик преобразует с трех команд строки.

Команда 1 заключается в замене всех вхождений подстроки ЕР на Л.

Команда 2 - в замене всех вхождений подстроки ЕЛ на Р.

Команда 3 - в замене всех вхождений подстроки ПЕ на Е.

Преобразование подстроки происходит в два этапа: сначала слева направо ищутся все подлежащие замене непересекающиеся подстроки в исходной строке, а затем путем соответствующих замен формируется новая строка.

Преобразование строки повторяется до тех пор, пока возможно производить замены.

Исходное слово ПЕРЕПЕЛ.

Запиши последовательность, которая получиться после выполнения алгоритма: 312.

Система счисления - метод записи чисел с определённого набора специальных символов (цифр) и сопоставления этим записям возможных значений.

Системы счисления бывают: позиционные (пример, десятичная и двоичная СС), непозиционные (пример, арабская или римская СС), смешанные (пример, счёт минут, часов).

Основанием системы счисления - набор символов (цифр), используемых в каждом из разрядов данного числа для его изображения в данной системе счисления

ИЛИ

Основание системы счисления - количество цифр и символов, использующихся для записи и демонстрации числа.

Const
  problems : array [0..9] of String = ('x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10','x1+5=10', 'x1+5=10', 'x1+5=10');
  answers : array [0..9] of String = ('-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5');
var
  countOfAnswers, counter: integer;
  userAnswer: String;
begin
  countOfAnswers := 0;
  for counter:=0 to 9 do
    begin
      write('Введите ответ уравнения ', problems[counter], ' : ');
      readln(userAnswer);
      if userAnswer = answers[counter] then Inc(countOfAnswers);
    end;
if countOfAnswers > 8 then writeln('Отлично')
    else if countOfAnswers > 5 then writeln('Хорошо')
    else writeln('Плохо');
end.