Для кодирования букв е, п, н, ч, ь решили использовать двоичное представление чисел 0, 1, 2, 3 и 4 соответственно (с сохранением одного незначащего нуля в случае одноразрядного представления). закодируйте последовательность букв печенье таким способом и результат запишите в восьмеричной системе счисления.

Ответ: печенье = 23120 в 8-ричной системе.

//pascal abc.net 3.1 сборка 1256 var   s,s1: string; begin readln(s); if (s[1]='в') and (s[2]=' ') then   begin   delete(s,1,1);   s: ='на'+s;   end; if (s[1]='в') and (s[2]=' ') then   begin   delete(s,1,1);   s: ='на'+s;   end; while pos(' в ',s)< > 0 do   begin   if (s[1]='в') and (s[2]=' ') then   begin   delete(s,1,1);   s: ='на'+s;   end; if (s[1]='в') and (s[2]=' ') then   begin   delete(s,1,1);   s: ='на'+s;   end;   s1: =s1+copy(s,1,pos(' в ',s)-1)+' на ';   delete(s,1,pos(' в ',s)+2);   end;   if (s[1]='в') and (s[2]=' ') then   begin   delete(s,1,1);   s: ='на'+s;   end; if (s[1]='в') and (s[2]=' ') then   begin   delete(s,1,1);   s: ='на'+s;   end; s: =s1+s; writeln(s); end. пример ввода 1: запасти в зиму, приехать в год, приготовить в день, выпить лекарство в ночь пример вывода 1: запасти на зиму, приехать на год, приготовить на день, выпить лекарство на ночь пример ввода 2(глубокие песни современной отечественной эстрады): в в в в в в в в в в в в в в в в в в . пример вывода 2: на на на на на на на на на на на на на на на на на на .