Паскаль abc.net дан произвольный текст на языке. написать программу, которая выводит слова, начинающиеся на согласную и заканчивающиеся гласной буквой. ,с комментариями где можно
168
278
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1467 от 02.06.2017 // внимание! если программа не работает, обновите версию! begin var pic: ='\b[бвгджзйклмнпрстфхцчшщъь]\s*[аеёиоуыэюя]\b'; readlnstring('введите: ').matchvalues(pic,regexoptions.ignorecase) .println(newline) end. пример введите: а роза упала на лапу азора, а карл у клары украл кораллы. роза на лапу клары кораллы
Var text,s: string; n,k: boolean; i: integer; begin write('введите текст на языке: '); readln(text); text: =lowercase(text)+' '; // перевоит текст в нижний регистр writeln(text); // показывает действие предыдущей строки for i: = 1 to length(text) do begin if ('а' < = text[i])and(text[i] < = 'я')or(text[i] = 'ё') then s: =s+text[i] // записываем буквы в s else // как только встречаем другой символ, проверяем, if length(s) > 0 then // есть ли в s хоть одна буква, begin // и если есть, то проверяем условие , и выводим слово на экран, если оно истинно if (s[1] in 'бвгджзйклмнпрстфхцчшщ')and(s[length(s)] in 'аоэиуыеёюя') then writeln(s); s: =''; // далее обнуляем s end; end; end. пример работы программы: введите текст на языке: дан произвольный текст на языке. написать программу, которая выводит слова, начинающиеся на согласную и заканчивающиеся гласной буквой. дан произвольный текст на языке. написать программу, которая выводит слова, начинающиеся на согласную и заканчивающиеся гласной буквой. на программу которая слова начинающиеся на согласную заканчивающиеся
Составной оператор — конструкция языка программирования , состоящая из нескольких команд (операторов) языка программирования, но участвующая в программе в качестве единого оператора. понятие составного оператора было унаследовано языком паскаль и множеством других языков программирования, основанных на алголе. в паскале условный оператор if, циклы while и for требуют в качестве ветвей и тела один оператор
Популярно: Информатика
-
nurbo5555555555125.10.2021 03:13
-
dannovchern08.05.2020 18:44
-
user666triplesix06.01.2022 03:32
-
Oksanaa1109.07.2022 21:39
-
ghawkkas6915.11.2020 17:12
-
rosharh8828.04.2021 07:47
-
alinana55421.01.2023 14:13
-
динька204.08.2022 17:10
-
7778889927.11.2021 08:15
-
ghui110.11.2020 19:31