65 ! умные люди которые знают как это делать,

ответ:

1.абек 2.авек 3.агк 4.агжк 5.аджк 6.абвек 7.абвгк 8.абвгжк 9.адгк

объяснение:

1.абек 2.авек 3.агкк 4.аджк 6.абвек 7.абвгк 8.адгк 9.авгк 10.авк

caps lock,shift

var ch,n,i: longint;

ch1,s: string;

begin

  read(s,ch);

  n: =length(s);

  writeln(n,' ',ch);

  str(ch,ch1);

  for i: =1 to n do if s[i]=ch1 then write(i,' ');

end.