• Pascal, строки
    Определить сколько раз встречается “о” в первом слове строки.

Ответы 2

  •  var   s: string;   c: char;   i: integer;   count: integer; begin   readLn(s);   read(c);   count := 0;   for i := 1 to length(s) do     if s[i] = c then       inc(count);   writeLn(count);   readLn; end.
    • Автор:

      nala9khb
    • 5 лет назад
    • 0
  • // PascalABC.NET 3.2, сборка 1387 от 20.02.2017// Внимание! Если программа не работает, обновите версию!begin  var w:=ReadlnString('Введите строку:').ToWords[0];  Writeln('Буква "о" встречается ',w.Matches('о').Count,' раз(а)')end.ПримерВведите строку: Хорошая погодка сегодня!Буква "о" встречается 2 раз(а)
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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