Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Adilkhan090801
0 / 0 / 0
Регистрация: 09.01.2019
Сообщений: 33
1

Даны набор гласных звуков и текст. Составьте набор, кроме гласных звуков в тексте

22.01.2019, 11:36. Просмотров 212. Ответов 3

Даны набор гласных звуков и текст. Составьте набор, кроме гласных звуков в тексте
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.01.2019, 11:36
Ответы с готовыми решениями:

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

Составьте программу подсчета гласных букв во введенной строке
Составьте программу подсчета гласных букв во введенной строке.

Составьте программу подсчета различных гласных букв в слове Х
Помогите пожалуйста составить программы, заранее спасибо 1. Составьте программу, выясняющую,...

Посчитать количество гласных в тексте
Дан текст. Посчитать кол-во гласных (использовать рекурсивную функцию для вычисления). Прошу,...

Подсчитать количество гласных букв в тексте
1. Вводится строка произвольного текста. Подсчитать количество гласных букв. 2. Определить, есть...

3
Puporev
Модератор
56074 / 42954 / 29712
Регистрация: 18.05.2008
Сообщений: 101,907
22.01.2019, 14:05 2
Набор это множество? set of char?
0
Adilkhan090801
0 / 0 / 0
Регистрация: 09.01.2019
Сообщений: 33
22.01.2019, 14:25  [ТС] 3
Возможно да.
0
Puporev
Модератор
56074 / 42954 / 29712
Регистрация: 18.05.2008
Сообщений: 101,907
22.01.2019, 14:58 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
var s:string;
    g,t:set of char;
    i:integer;
begin
writeln('Введите набор гласных букв');
readln(s);//ввод строки из гласных букв
g:=[];
for i:=1 to length(s) do
include(g,s[i]);
writeln('Введите текст');
readln(s);
t:=[];
for i:=1 to length(s) do
include(t,s[i]);
t:=t-g;
if t=[] then write('Весь текст из набора гласных букв')
else
 begin
  writeln('Множество букв текста без букв из набора гласных');
  for i:=65 to 255 do
  if chr(i) in t then write(chr(i));
 end;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.01.2019, 14:58

Поиск повторяющихся гласных букв в тексте
Всем привет, нужно написать программу, которая выводит на экран повторяющиеся гласные буквы, с...

Подсчитать количество гласных букв в тексте
дан текст,ХРАНЯШИЙСЯ В ТЕКСТОВОМ ФАЙЛЕ.Подсчитать количество гласных букв в ТЕКСТЕ!!! мне решили...

Согласных или гласных букв больше в тексте?
Дан текст из цифр из строчных латинских букв, за которыми следует точка. Определить каких букв-...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru