0 / 0 / 0
Регистрация: 30.12.2016
Сообщений: 2
1

Дана строка, слова разделены одним пробелом, в конце точка

30.12.2016, 23:03. Показов 8080. Ответов 1

Author24 — интернет-сервис помощи студентам
Дана строка, слова разделены одним пробелом, в конце точка. Если последняя буква последнего слова и первая буква слова минимальной длины одинаковы, то поменять их местами. В противном случае удалить слово минимальной длины.

Буду очень благодарна за помощь.
0
Лучшие ответы (1)
30.12.2016, 23:03
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.12.2016, 23:03
Ответы с готовыми решениями:

Паскаль.Дан текст. слова в котором разделены хотя бы одним пробелом
Дан текст, слова в котором разделены хотя бы одним пробелом. Найти слово, в котором букв “А” больше, чем в других.

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

Дан текст, слова в котором разделены хотя бы одним пробелом
Дан текст, слова в котором разделены хотя бы одним пробелом. подсчитать кол-во слов в тексте. Добавлено через 44 секунды Как...

1
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
31.12.2016, 10:03 2
Лучший ответ Сообщение было отмечено lonelynut как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
var s,s1,sp,sm:string;
    i,j,im,ip,mn:byte;
begin
writeln('Введите строку из слов, разделенных одним пробелом в конце точка');
readln(s);
//составляем последнее слово
sp:='';
i:=length(s)-1;
while (i>=1)and(s[i]<>' ') do
 begin
  sp:=s[i]+sp;
  i:=i-1;
 end;
ip:=i+1; //его начало
//ищем слово минимальной длины
mn:=255;
i:=1;
while i<length(s) do
if (s[i]<>' ')and((i=1)or(s[i-1]=' ')) then
 begin
  s1:='';
  j:=i;
  while(j<length(s))and(s[j]<>' ')do
   begin
    s1:=s1+s[j];
    j:=j+1;
   end;
  if length(s1)<mn then
   begin
    mn:=length(s1);
    im:=i;  //его начало
    sm:=s1; //само слово
   end;
  i:=i+length(s1);
 end
else i:=i+1;
if sm[1]=sp[1] then //если первые буквы одинаковые
 begin
  delete(s,ip,length(sp)); //удаляем последнее
  insert(sm,s,ip); //на его место вставляем минимальное
  delete(s,im,length(sm)); //удаляем минимальное
  insert(sp,s,im);         //вставляем последнее
 end
else delete(s,im,length(sm)); //иначе удаляем минимальное
write(s)
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
31.12.2016, 10:03
Помогаю со студенческими работами здесь

Дана строка, в которой слова разделены одним пробелом. Найдите и выведите все слова указанной длины
В итоге вышло, что если первое слово правильной длинны - выводит все слова в строке. Если нет - ничего не выводит. int main() { char...

Дано предложение ( слова разделены одним пробелом, в конце .) Найти кол-во слов "мама" в предложении.
Дано предложение ( слова разделены одним пробелом, в конце .) Найти кол-во слов &quot;мама&quot; в предложении. через string

Дана фраза, в которой слова разделены одним пробелом, а сама фраза заканчивается точкой
Дана фраза, в которой слова разделены одним пробелом, а сама фраза заканчивается точкой.Требуется: Найти количество слов, начинающихся на...

Дан текст. Слова в тексте отделены одним пробелом, в конце текста точка. Каждое слово, начинающееся и оканчивающееся
Сроки горят, из-за работы не успеваю подготовиться к защите кр. Может кто сможет помочь? Желательно не использовать процедуры и функции,...

Дана строка, состоящей из слов, слова отделены друг от друга одним пробелом. Определить длину каждого слова
Дана строка, состоящей из слов, слова отделены друг от друга одним пробелом. Определить длину каждого слова.


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Ошибка Docker "Got permission denied while trying to connect to the Docker daemon socket at"
hw_wired 14.02.2025
Разработка с использованием Docker может иногда преподносить неожиданные сюрпризы, и одним из самых распространенных камней преткновения становится ошибка с отказом в доступе к демону Docker. . . .
Ошибка "No 'Access-Control-Allow-Origin' header is present on the requested resource"
hw_wired 14.02.2025
При разработке современных веб-приложений нередко сталкиваешься с ошибкой "No 'Access-Control-Allow-Origin' header is present on the requested resource". Эта проблема возникает из-за политики. . .
Как закрыть порт в Linux
hw_wired 14.02.2025
Управление сетевыми портами в Linux - непростая, но важная задача для обеспечения безопасности системы. Каждый открытый порт - это потенциальная уязвимость, через которую злоумышленики могут. . .
Ошибка Angular "Can't bind to 'taskForm' since it isn't a known property of 'form'"
hw_wired 14.02.2025
При разработке веб-приложений на Angular можно столкнуться с ошибкой "Can't bind to '' since it isn't a known property of 'form'". Эта ошибка появляется в консоли браузера когда мы пытаемся. . .
Сообщение Git "Pulling without specifying how to reconcile divergent branches is discouraged"
hw_wired 14.02.2025
При работе с системой контроля версий Git многие разработчики сталкиваются с предупреждающим сообщением "Pulling without specifying how to reconcile divergent branches is discouraged". Это. . .
Как настроить количество пробелов в отступах табов в Visual Studio Code
hw_wired 14.02.2025
Visual Studio Code предоставляет несколько гибких способов настройки табуляции, каждый из которых имеет свои преимущества. Самый простой и наглядный метод - через графический интерфейс настроек, где. . .
Что означает знак восклицания в TypeScript
hw_wired 14.02.2025
TypeScript - удивительный язык программирования, который предоставляет множество возможностей для работы с типами данных. Особый интерес вызывает оператор утверждения ненулевого значения, который. . .
Как свернуть/скрыть секции кода в Visual Studio Code
hw_wired 14.02.2025
Ежедневно мы работам с файлами, содержащими сотни и тысячи строк кода. Навигация по такому объему становится настоящим испытанием, особенно когда нужно быстро найти нужный метод или переменную. . . .
Автоматическое создание файла requirements.tx­t в Python
hw_wired 14.02.2025
Дружелюбная среда для разработки на Python, один из самых широко используемых языков программирования, состоит не только из самого кода, но и целого ряда важных компонентов. И если вы когда-нибудь. . .
Передача переменных окружения в контейнер Docker
hw_wired 14.02.2025
При работе с Docker контейнерами возникает необходимость передать различные настройки и конфигурационные параметры - от строк подключения к базам данных до API ключей. И хотя можно жестко прописать. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru