В алфавитном языке племени тумба юмба четыре буквы: 'ы' 'ш' 'ч' и 'о'. Нужно вывести на экран все возможные слова, состоящие из К букв в которых есть по крайней мере две одинаковые буквы, стоящие рядом, подсчитайте кол-во таких слов

var count: integer;

var K:=ReadInteger('Введите K:= ');

procedure p(s : string);

begin

 if length(s) = K then

 begin

   writeln(s);

   inc(count);

 end

 else

   if (length(s) < 2) or (s[2] = 'Ы') then

   begin

     p(s + 'Ы');

     p(s + 'Ш');

     p(s + 'Ч');

     p(s + 'О')

   end;

end;

begin

 count := 0;

 p('');

 writeln('Колличество слов = ', count);

end.

карандаш — инструмент в виде стержня, изготавливаемого из пишущего материала (угля, графита, сухих красок и т. п.) применяемый для письма, рисования, черчения.

1 simvol zanimaet 1 bait(tak kak imeem tekst);

tekst shpargalki sostavliaet 50*50=2500 simvolov-2500 bait.

da + eshe 0,3*2500=750.

vsego 2500+750=3250 bait.