• НА ПАСКАЛЕ
    Дана строка. Найдите в этой строке второе вхождение буквы f, и выведите индекс этого вхождения. Если буква f в данной строке встречается только один раз, выведите число -1, а если не встречается ни разу, выведите число -2.

Ответы 1

  • varf:char;s:string;i,k:integer;beginreadln(s);k:=0;for i:= 1 to length(s) do beginif s[i]='f' then k:=k +1;if k=2 thenbeginwriteln(i);break;end;end;if k=1 then writeln('-1');if k=0 then writeln('-2');readln;end.
    • Автор:

      foster21
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years