• Помогите, пожалуйста, составить программу, определяющую, какая из букв "Е" или "О" встречается чаще в предложении. Если можно, то с объяснением. Даю 25 баллов.

Ответы 12

  • Откуда взялось ko и ke? Объясните, пожалуйста.
  • ko-переменная счетчик букв о
    • Автор:

      kiana
    • 5 лет назад
    • 0
  • ке- счетчик букв е
  • Хорошо, спасибо))
  • Пожалуйста, обращайтесь
    • Автор:

      jamesxtno
    • 5 лет назад
    • 0
  • Прочитать строку, перекодировать буквы на верхний регистр и результат поместить в переменную s, присвоив ей тип string.
  • ппц прям С# какой-то
    • Автор:

      gavinhall
    • 5 лет назад
    • 0
  • Это С# c добавками вкусняшек из Питона и Хаскеля, но в синтаксисе Паскаля
  • В итоге я совместила две ваши программы и всё получилось)) Спасибо большое!
    • Автор:

      seth57
    • 5 лет назад
    • 0
  • Оно и без совмещения получается. Зачем ужа с ежом скрещивать?
    • Автор:

      zaidrqtv
    • 5 лет назад
    • 0
  • var i,ke,ko:integer;s:string;beginko:=0;ke:=0;readln(s);for i:=1 to length(s) do beginif (s[i]='Е') or (s[i]='е') then ke:=ke+1;if (s[i]='О') or (s[i]='о') then ko:=ko+1;end;if ko>ke then writeln('К встречается чаще') else writeln('О встречается чаще');end.
  • // PascalABC.NET 3.3, сборка 1583 от 25.11.2017// Внимание! Если программа не работает, обновите версию!begin  var s:=ReadlnString.ToUpper; // к верхнему регистру  var (kO,kE):=(0,0); // счетчики  for var i:=1 to s.Length do    case s[i] of    'О':ko+=1;    'Е':kE+=1    end;  if kO>kE then Writeln('Буква "О" встречается чаще')  else if kO<kE then Writeln('Буква "Е" встречается чаще')  else Writeln('Буквы "О" и "Е" встречаются одинаковое число раз')end.ПримерЕсли бы Ольга захотела, она бы училась лучше ЕленыБуква "Е" встречается чаще
    • Автор:

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

Войти через Google

или

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

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

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