Заблокирован

Поменять местами первое и третье слово

27.01.2012, 23:03. Показов 2401. Ответов 4
Метки нет (Все метки)

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

Поменять местами первое и третье слово
Дано предложение. Поменять местами первое и третье слово. Определить их длину.

Поменять местами первое и второе слова,третье и четвертое и т.д.
дано предложение. Поменять местами первое и второе слова,третье и четвертое и т.д.Если количество слов нечетное то удалить слово из...

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

4
28.01.2012, 01:03
 Комментарий модератора 
на будущее, чтобы Вас не постигла судьба Найти количество цифр данного числа, больших А
читайте правила, и выполняйте их требования.
0
Почетный модератор
 Аватар для КонецСвета
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
28.01.2012, 21:29
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var s,s2: string;
    i,ns: integer;
begin
write('s=');
readln(s);
s:=s+' ';
ns:=pos(' ',s)+1;
i:=ns;
while s[i]<>' ' do
      inc(i);
s2:=copy(s,ns,i-ns)+' ';
writeln(s2);
delete (s,ns,i-ns+1);
i:=ns;
while s[i]<>' ' do
      inc(i);
insert(s2,s,i+1);
write('s=',s);
readln;
end.
Добавлено через 1 час 11 минут
***Анастасия***, ошибка у меня, извини! меняю второе и третье... сейчас исправлю...
1
Заблокирован
28.01.2012, 21:33  [ТС]
ёда я проверила меняет второе и третье..только тут ещё надо найти длину слов..всё равно спасибо=))
0
Почетный модератор
 Аватар для КонецСвета
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
28.01.2012, 21:55
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

вот переделанная, только поясни про длину слов - каждого слова? тогда совсем другое решение будет ....
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
uses crt;
var s,s1,s3: string;
    i,k,ns: integer;
begin
write('s=');
readln(s);
s:=s+' ';
s1:='';
while s[1]<>' ' do
      begin
      s1:=s1+s[1];
      delete(s,1,1);
      end;
k:=0; i:=0;
while k<2 do
      begin
      if s[i]=' ' then inc(k);
      inc(i);
      end;
ns:=i;
writeln(i);
while s[i]<>' ' do
      inc(i);
writeln(i);
s3:=copy(s,ns,i-ns);
delete (s,ns,length(s3));
insert(s1,s,ns);
insert(s3,s,1);
writeln('s=',s);
writeln('Длина  первого: ',length(s1));
writeln('Длина третьего: ',length(s3));
readln;
end.
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
28.01.2012, 21:55
Помогаю со студенческими работами здесь

Поменять местами первое и последнее слово
Помогите написать программу. &quot;Поменяйте местами первое и последнее слово&quot; (ввод строк организуйте в программе. Строка должна состоять...

Поменять в данной строке третье слово и слово минимальной длины
Поменять в данной строке третье слово и слово минимальной длины (первое по порядку).

Поменять в данной строке предпоследнее слово и слово минимальной длины (первое по порядку)
Поменять в данной строке предпоследнее слово и слово минимальной длины (первое по порядку).

Поменять местами первое слово строки с последним
Помогите пожалуйста, срочно надо!!! Условие: Дана строка заканчивающаяся точкой, а слова в которой разделены пробелом. Поменять местами...

Поменять местами второе и третье слова
Помогите пожалуйста с задачкой! На вид задача не сложная, но со строками не могу никак подружиться. Заданы 2 строки, состоящие из...


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

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

Новые блоги и статьи
Blazor и контроллер сервопривода IoT Meadow Maple
Wired 11.07.2025
Я решил разобраться, как можно соединить современные веб-технологии с миром "железа". Интересная комбинация получилась из Blazor в качестве веб-интерфейса и микроконтроллера Meadow с его веб-сервером. . .
Генерация OpenQASM из кода Q#
EggHead 10.07.2025
Летом 2024-го я начал эксперименты с библиотекой Q# Bridge, и знаете что? Она оказалась просто находкой для тех, кто работает на стыке разных квантовых экосистем. Основная фишка этой библиотеки -. . .
Изучаем новый шаблон ИИ-чата .NET AI Chat Web App
stackOverflow 10.07.2025
В . NET появилось интересное обновление - новый шаблон ИИ-чата под названием . NET AI Chat Web App. Когда я впервые наткнулся на анонс этого шаблона, то сразу понял, что Microsoft наконец-то. . .
Результаты исследования от команды ARP (июль 2025 г.)
Programma_Boinc 10.07.2025
Результаты исследования от команды ARP (июль 2025 г. ) Африканский проект по дождям (ARP) World Community Grid снова запущен! Мы рады поделиться обновленной информацией о нашем прогрессе с осени. . .
Angular vs Svelte - что лучше?
Reangularity 09.07.2025
Сегодня рынок разделился на несколько четких категорий: тяжеловесы корпоративного уровня (Angular), гибкие универсалы (React), прогрессивные решения (Vue) и новая волна компилируемых фреймворков. . .
Code First и Database First в Entity Framework
UnmanagedCoder 09.07.2025
Entity Framework дает нам свободу выбора, предлагая как Code First, так и Database First подходы. Но эта свобода порождает вечный вопрос — какой подход выбрать? Entity Framework — это. . .
Как использовать Bluetooth-модуль HC-05 с Arduino
Wired 08.07.2025
Bluetooth - это технология, созданная чтобы заменить кабельные соединения. Обычно ее используют для связи небольших устройств: мобильных телефонов, ноутбуков, наушников и т. д. Работает она на частоте. . .
Руководство по структурам данных Python
AI_Generated 08.07.2025
Я отчетливо помню свои первые серьезные проекты на Python - я писал код, он работал, заказчики были относительно довольны. Но однажды мой наставник, взглянув на мою реализацию поиска по огромному. . .
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах
Programma_Boinc 08.07.2025
Тестирование энергоэффективности и скорости вычислений видеокарт в BOINC проектах Опубликовано: 07. 07. 2025 Рубрика: Uncategorized Автор: AlexA Статья размещается на сайте с разрешения. . .
Раскрываем внутренние механики Android с помощью контекста и манифеста
mobDevWorks 07.07.2025
Каждый Android-разработчик сталкивается с Context и манифестом буквально в первый день работы. Но много ли мы задумываемся о том, что скрывается за этими обыденными элементами? Я, честно говоря,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru