Вывести слова из строки, которые имеют длину больше 5 и начинаются с буквы 'А' или 'а'

@GaleI · Регистрация: 05.10.2009

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

Привет! Помогите решить задачу со строками по программированию!!
1.ВВЕСТИ строку. На печать выдать слова, которые имеют длину больше 5 и начинаются с буквы 'А' или 'а'.
2.Дан текст. Сколько слов в тексте? Сколько цифр в тексте?

@John_Pa9JIbHuK · 05.10.2009, 08:54

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
s,s2:string;
i,x:integer;
begin
writeln('Ââåäèòå ñòðîêó');
readln(s);
s:=s+' ';
for i:=1 to length(s) do
begin
X:=POS(' ',s);
s2:=copy(s,1,x-1);
delete(s,1,x);
if upcase(s2[1])='A' then write(s2+' ');
end;
end.

@Puporev · 05.10.2009, 09:20

John_Pa9JIbHuK, Смотри

которые имеют длину больше 5

Добавь это условие.

@John_Pa9JIbHuK · 05.10.2009, 10:31

Puporev, ок

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
s,s2:string;
i,x:integer;
begin
writeln('Ââåäèòå ñòðîêó');
readln(s);
s:=s+' ';
for i:=1 to length(s) do
begin
X:=POS(' ',s);
s2:=copy(s,1,x-1);
delete(s,1,x);
if (upcase(s2[1])='A')and(length(s2)>=5) then write(s2+' ');
end;
end.

@GaleI · 05.10.2009, 13:49 **[ТС]**

John_Pa9JIbHuK and Puporev......спасибо чуваки, реально выручили))))Respekt

Новые блоги и статьи Все статьи Все блоги /
SwiftUI Data Flow: Передача данных между представлениями mobDevWorks 23.03.2025 При первом знакомстве со SwiftUI кажется, что фреймворк предлагает избыточное количество механизмов для передачи данных: @State, @Binding, @StateObject, @ObservedObject, @EnvironmentObject и другие. . . .	Моки в Java: Сравниваем Mockito, EasyMock, JMockit Javaican 23.03.2025 Как протестировать класс, который зависит от других сложных компонентов, таких как базы данных, веб-сервисы или другие классы, с которыми и так непросто работать в тестовом окружении? Для этого и. . .	Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .
Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .	Колмогоровская сложность: Приёмы упрощения кода ArchitectMsa 20.03.2025 Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .	PostgreSQL в Kubernetes: Подготовка кластера и настройка Mr. Docker 20.03.2025 Когда доходит до контейнеризации баз данных и особенно таких требовательных к ресурсам системах как PostgreSQL, многие команды до сих пор колеблются, прежде чем перенести их в контейнерную. . .	C++26: Индексирование пакетов и метапрограммирование bytestream 20.03.2025 Эволюция C++ продолжается стремительными темпами – каждый новый стандарт приносит функциональность, о которой мы мечтали годами. Звучит слишком громко? Если вы когда-либо боролись с вариадическими. . .

@GaleI 1 / 1 / 0 Регистрация: 05.10.2009 Сообщений: 119

	Вывести слова из строки, которые имеют длину больше 5 и начинаются с буквы 'А' или 'а' 05.10.2009, 07:44. Показов 1250. Ответов 4 Метки нет (Все метки) Привет! Помогите решить задачу со строками по программированию!! 1.ВВЕСТИ строку. На печать выдать слова, которые имеют длину больше 5 и начинаются с буквы 'А' или 'а'. 2.Дан текст. Сколько слов в тексте? Сколько цифр в тексте? 0

@Puporev Почетный модератор 64307 / 47604 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	05.10.2009, 09:20
	John_Pa9JIbHuK, Смотри которые имеют длину больше 5 Добавь это условие. 0

@GaleI 1 / 1 / 0 Регистрация: 05.10.2009 Сообщений: 119
	05.10.2009, 13:49 [ТС]
	John_Pa9JIbHuK and Puporev......спасибо чуваки, реально выручили))))Respekt 0

Опции темы