Вывести все согласные, которых нет ни в одном слове данного предложения

@maxwelln1 · Регистрация: 03.11.2014

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

Дано предложение. Вывести все согласные, которых нет ни в одном слове.
Написать с использованием подпрограмм. Заранее БОЛЬШОЕ спасибо.

@maxwelln1 · 29.10.2016, 22:39 **[ТС]**

Помогите пожалуйста

@bormant · 30.10.2016, 19:31

Зачем здесь подпрограммы?

Pascal
1
2
3
  ReadLn(s);
  for i:=1 to Length(s) do Include(s[i],m);
  for c in Consonants-m do Write(' ',c); WriteLn;

@maxwelln1 · 30.10.2016, 20:05 **[ТС]**

Препод говорит, чтобы все было через процедуры/функции. И запрещает использовать внутренние функции Include и подобные

@bormant · 30.10.2016, 20:25

Где это написано в задании? Какие ещё ограничения? Каков точный текст задания, а то потом и Pos со строками окажется нельзя использовать?

@maxwelln1 · 30.10.2016, 20:42 **[ТС]**

Так меня самого это бесит, препод немного "шалит"

Добавлено через 1 минуту

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var s:string;
    i:integer;
    c:char;
    p:set of char;
begin
   Write('s = '); Readln(s);
   p:=['q','w','r','t','p','s','d','f','g','h','j','k','l','z','x','c','v','b','n','m'];
   For i:=1 to Length(s) do
      p:=p-[LowerCase(s[i])[1]];
   For c:='a' to 'z' do
      If c in p then
         Write(c);
   Readln;
end.

вот есть код, но опять же его нужно разбить на функции/процедуры и lowercase не обязательно использовать, можно считать что все буквы строчные.

@bormant · 30.10.2016, 21:25

То есть, Exclude(p,LowerCase(s[i])) нельзя, а p:=p-LowerCase(s[i]) можно? Не, я понимаю там "не использовать множества и операции с ними", но вариант, где можно только часть? Зачем?
Ну сделайте пару процедур

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const Cons = ['Q','W','R','T','P','S','D','F','G','H','J','K','L','Z','X','C','V','B','N','M'];
type TChars = array of Char;
procedure ExcludeStr(var m: TChars; const s: String);
var e: Char;
begin
  for e in s do m:=m-UpCase(e); { Exclude(m,UpCase(s[i])); }
end;
procedure ShowChars(const m: TChars);
var e: Char;
begin
  for e in m do Write(e:2); WriteLn;
end;
var
  m: TChars; s: String;
begin
  ReadLn(s); m:=Cons; ExcludeStr(m,s); ShowChars(m);
end.

Добавлено через 1 минуту
Или IncludeStr(m,s) и ShowChars(Cons-m).

@maxwelln1 · 30.10.2016, 21:31 **[ТС]**

Я про то, что даже инклуд нельзя, он тут и не нужен. как бы гарантируется, что буквы либо нижнего либо верхнего регистра

Добавлено через 56 секунд
по этому коду пусть все будут верхнего регистра, это не важно

@bormant · 30.10.2016, 21:49

Include(m,e) -- это m:=m+e,
Exclude(m,e) -- это m:=m-e,
а +/- можно, насколько понял, не вижу проблемы.

Новые блоги и статьи Все статьи Все блоги /
Angular: Вопросы и ответы на собеседовании Reangularity 15.06.2025 Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .	Архитектура Onion в ASP.NET Core MVC stackOverflow 15.06.2025 Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .	Unity 4D GameUnited 13.06.2025 Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .	SSE (Server-Sent Events) в ASP.NET Core и .NET 10 UnmanagedCoder 13.06.2025 Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .	С днём независимости России! Hrethgir 13.06.2025 Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .
Лето вокруг. kumehtar 13.06.2025 Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .	Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев). Hrethgir 12.06.2025 Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .	Топ10 библиотек C для квантовых вычислений bytestream 12.06.2025 Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .	Dispose и Finalize в C# stackOverflow 12.06.2025 Работая с C# больше десяти лет, я снова и снова наблюдаю одну и ту же историю: разработчики наивно полагаются на сборщик мусора, как на волшебную палочку, которая решит все проблемы с памятью. Да,. . .	Повышаем производительность игры на Unity 6 с GPU Resident Drawer GameUnited 11.06.2025 Недавно копался в новых фичах Unity 6 и наткнулся на GPU Resident Drawer - штуку, которая заставила меня присвистнуть от удивления. По сути, это внутренний механизм рендеринга, который автоматически. . .

@maxwelln1 2 / 2 / 0 Регистрация: 03.11.2014 Сообщений: 59

	Вывести все согласные, которых нет ни в одном слове данного предложения 27.10.2016, 18:29. Показов 1776. Ответов 8 Метки нет (Все метки) Дано предложение. Вывести все согласные, которых нет ни в одном слове. Написать с использованием подпрограмм. Заранее БОЛЬШОЕ спасибо. 0

@maxwelln1 2 / 2 / 0 Регистрация: 03.11.2014 Сообщений: 59
	29.10.2016, 22:39 [ТС]
	Помогите пожалуйста 0

@maxwelln1 2 / 2 / 0 Регистрация: 03.11.2014 Сообщений: 59
	30.10.2016, 20:05 [ТС]
	Препод говорит, чтобы все было через процедуры/функции. И запрещает использовать внутренние функции Include и подобные 0

@bormant Модератор 7810 / 4630 / 2835 Регистрация: 22.11.2013 Сообщений: 13,149 Записей в блоге: 1
	30.10.2016, 20:25
	Где это написано в задании? Какие ещё ограничения? Каков точный текст задания, а то потом и Pos со строками окажется нельзя использовать? 0

@maxwelln1 2 / 2 / 0 Регистрация: 03.11.2014 Сообщений: 59
	30.10.2016, 21:31 [ТС]
	Я про то, что даже инклуд нельзя, он тут и не нужен. как бы гарантируется, что буквы либо нижнего либо верхнего регистра Добавлено через 56 секунд по этому коду пусть все будут верхнего регистра, это не важно 0

@bormant Модератор 7810 / 4630 / 2835 Регистрация: 22.11.2013 Сообщений: 13,149 Записей в блоге: 1
	30.10.2016, 21:49
	Include(m,e) -- это m:=m+e, Exclude(m,e) -- это m:=m-e, а +/- можно, насколько понял, не вижу проблемы. 0

Опции темы