Выписать все слова текста, в которых отсутствуют буквы (б,в,г,д,с,л,м,н,р)

@Galikarnas · Регистрация: 22.11.2016

Author24 — интернет-сервис помощи студентам

Помогите перевести код с Pascal на С++

Pascal

const m: set of char = ['б', 'в', 'г', 'д', 'с', 'л', 'м', 'н', 'р'];
var s, w: string;
    i: integer;
    c: char;
    b: set of char;
    found: boolean;
begin
  writeln('Введите строку:');
  readln(s);
  write('Слова, в которых отсутствуют буквы');
  w := ' ';
  for c := low(char) to high(char) do
    if c in m
      then begin
        write(w, c);
        w := ', '
      end;
  writeln(':');
  s := s + ' ';
  w := '';
  b := [];
  found := false;
  for i := 1 to length(s) do
    if s[i] <> ' '
      then begin
        include(b, s[i]);
        w := w + s[i]
      end
      else begin
        if (b * m = []) and (length(w) > 0)
          then begin
            writeln(w);
            found := true
          end;
        w := '';
        b := []
      end;
  if not found then writeln('<Не найдены>');
  readln
end.

Добавлено через 1 час 29 минут
Или вот задание:
В заданной строке текста слова разделены произвольным числом пробелов. Выписать все слова, в которых отсутствуют буквы(б,в,г,д,с,л,м,н,р).

@Геомеханик · 30.11.2017, 09:26

C++

#include <iostream>
#include <string>
 
inline bool is_find(const char* s, std::string::const_iterator a, std::string::const_iterator b){
    for(; a != b; ++a){
        for(const char* i = s; *i; ++i){
            if(*i == *a)
                return true;
        }
    }
    return false;
}
 
int main(void){
    std::string s = "яйцо, шурик, ром, лиса, dog, велик, заяц";
/*
    std::cout << "Enter: ";
    std::getline(std::cin, s);
*/
 
    const char cs[] = "бвгдслмнр";
    std::string w;
 
    const char ds[] = " \t\n,.!?";
    std::string::size_type i, j;
    for(i = 0; (i = s.find_first_not_of(ds, i)) != std::string::npos; i = j){
        if((j = s.find_first_of(ds, i)) == std::string::npos)
            j = s.length();
 
        if(!is_find(cs, s.begin() + i, s.begin() + j)){
            w.append(s.begin() + i, s.begin() + j);
            w += ' ';
        }
    }
    std::cout << w;
    std::cin.get();
    return 0;
}

	30.11.2017, 09:26

Выписать все слова текста, в которых отсутствуют буквы (б,в,г,д,с,л,м,н,р)

Решение