Question

Составьте программу, выясняющую, есть ли в слове Х хотя бы одна из букв "о" или "а"?

Answer 1

Var
  s, w: string;
  i, X, n, k, p, q: integer;

begin
  Writeln('Введите фразу, разделяя слова ровно одним пробелом');
  Readln(s);
  Write('Введите номер слова для поиска: '); Readln(X);
  {
  Ищем в строке s местоположение слова номер Х.
  Его начальную позицию в строке обозначим p, а конечную - q
  }
  n := Length(s);
  i := 1; k := 0; p := 0; q := 0;
  repeat
    if s[i] = ' ' then
    begin
      Inc(k);
      if k = X - 1 then p := i + 1
      else if k = X then q := i - 1
    end;
    if q = 0 then i := i + 1
  until (q > 0) or (i > n);
  if (p = 0) then Writeln('Количество слов в строке меньше ', X)
  else if q = 0 then q := n;
  w := Copy(s, p, q - p + 1);
  if (Pos('а', w) > 0) or (Pos('о', w) > 0) then
    Writeln('Одна из букв (а,о) есть в слове "', w, '"')
  else Writeln('В слове "', w, '" нет ни буквы а, ни буквы о')
end.

Тестовое решение:
Введите фразу, разделяя слова ровно одним пробелом
Самая лучшая рыба- это колбаса!
Введите номер слова для поиска: 5
Одна из букв (а,о) есть в слове "колбаса!"

Введите фразу, разделяя слова ровно одним пробелом
Тестирование программ может служить доказательством наличия ошибок, но никогда не докажет их отсутствие!» Эд. Дейкстра, 1972 г.
Введите номер слова для поиска: 4
В слове "служить" нет ни буквы а, ни буквы о

Answer 2

#include <iostream>
#include <string>

int main()
{
std::string x;
std::cin >> x;

bool same= false;
for (auto i : x){
    if (i == 'o' || i == 'a') {same = true; break;}
}
std::cout << std::boolalpha << same;

return 0;
}

Answer 3

Конечно! Вот пример программы на языке Python, которая проверяет, есть ли в заданном слове хотя бы одна из букв "о" или "а":

pythonCopy code
def check_word(word):
    for letter in word:
        if letter.lower() == 'о' or letter.lower() == 'а':
            return True
    return False

# Пример использования программы
input_word = input("Введите слово: ")
if check_word(input_word):
    print("В слове есть буква 'о' или 'а'.")
else:
    print("В слове нет буквы 'о' или 'а'.")

Программа принимает ввод от пользователя и затем вызывает функцию check_word, передавая в нее введенное слово. Функция check_word перебирает все буквы в слове и проверяет, совпадает ли хотя бы одна из них с буквами "о" или "а" (без учета регистра). Если совпадение найдено, функция возвращает значение True, в противном случае - False. Затем программа выводит соответствующее сообщение в зависимости от результата проверки.