инфор-ка - вопрос №79799

Помогите пож-ста.Дана строка символов.Подсчитать количество сочетаний ck. это задание к курсовой по информ-ке.

Лучший ответ по мнению автора

var
  S:String;
  i,number:integer;

begin

  read(S);
  number:=0;
  for i:=1 to length(S)-1 do
    if (S[i]='c') and (S[i+1]='k') then number:=number+1;
  write('Число сочетаний ck', number);

end.

Это ж где такие легкие курсовые пишут? Я тоже хочу там учиться )))...

12.05.11
Лучший ответ по мнению автора

Еva

Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store