огромного количества.Дана непустая последовательность слов из строчных российских букв:меж примыкающими
Огромного количества.
Дана непустая последовательность слов из строчных российских букв:
меж соседними словами-запятая,за последним словом-точка.Напечатать в алфавитном порядке все гласные буквы,которые не входят желая бы в одно чётное слово.
Подлапкин
Влад
Мова?
Олуферова
Любовь
Для чего, видя задание на русском языке, лезть с вопросами про "мову"?
Dasha Putenkova
Мова?
Денис Палыга
Для чего, видя задание на российском языке, лезть с вопросами про "мову"?
Смешина
София
Мова?
Алла Дунских
Для чего, видя задание на русском языке, лезть с вопросами про "мову"?
1 ответ
Злата Рузманкина
PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnString.ToWords(Arr(',','.'));
var (i,ssg):=(1,'аеёиоуыэюя');
var sg:=['а','е','ё','и','о','у','ы','э','ю','я'];
while ilt;=a.Length do begin
foreach var c in a[i].ToCharArray do
if c in sg then Exclude(sg,c);
i+=2
end;
for var j:=ssg.Length downto 1 do
if not (ssg[j] in sg) then Delete(ssg,j,1);
ssg.ToCharArray.Println(',')
end.
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadlnString.ToWords(Arr(',','.'));
var (i,ssg):=(1,'аеёиоуыэюя');
var sg:=['а','е','ё','и','о','у','ы','э','ю','я'];
while ilt;=a.Length do begin
foreach var c in a[i].ToCharArray do
if c in sg then Exclude(sg,c);
i+=2
end;
for var j:=ssg.Length downto 1 do
if not (ssg[j] in sg) then Delete(ssg,j,1);
ssg.ToCharArray.Println(',')
end.
Голядкиа
Амелия
Самая большая проблема была в том, что буковка "ё" в кодовой таблице стоит вне прочих российских букв и нарушает порядок сортировки. Пришлось изворачиваться. А вообщем огромного количества, как они в Паскале реализованы, это пережиток прошедшего и необходимо применять их только там, где они абсолютно нужны.
Витек
Самая большая неувязка была в том, что буковка "ё" в кодовой таблице стоит вне иных российских букв и нарушает порядок сортировки. Пришлось изворачиваться. А вообще множества, как они в Паскале реализованы, это пережиток прошлого и необходимо использовать их только там, где они совершенно необходимы.
Борис Паникаров
Самая большая проблема была в том, что буковка "ё" в кодовой таблице стоит вне прочих российских букв и нарушает порядок сортировки. Пришлось изворачиваться. А вообще огромного количества, как они в Паскале реализованы, это пережиток прошлого и необходимо использовать их только там, где они абсолютно необходимы.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов