Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/54: Рейтинг темы: голосов - 54, средняя оценка - 4.83
1 / 1 / 0
Регистрация: 07.11.2012
Сообщений: 47
1

В строке поменять местами первое и последнее слова

07.11.2012, 10:57. Просмотров 11090. Ответов 3
Метки нет (Все метки)


Задание 2
В строке, содержащей не менее двух слов, разделенных пробелом, поменять местами первое и последнее слова.

Входные данные:
abcde fghik lmnop qrst uxyz

Выходные данные:
uxyz fghik lmnop qrst abcde


Заранее спасибо
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
07.11.2012, 10:57
Ответы с готовыми решениями:

В заданной строке найти первое и последнее слова и поменять их местами.
Помогите, пожалуйста, с прогой! В заданной строке найти первое и последнее слова и поменять их...

Дана строка символов Х. Поменять местами первое и последнее слово
Помогите ,очень прошу:cry:Заранее спасибо):)(Только через Паскаль)

Поменять местами в строке первое и последнее слова
Поменять местами в строке первое и последнее слова. Считать, что слова отделены друг от друга одним...

Поменять местами в строке первое и последнее слова
Помогите пожалуйста: Поменять местами в строке первое и последнее слова. Считать, что слова...

3
Почетный модератор
7954 / 3925 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
07.11.2012, 14:29 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses crt;
var s,s1,s2: string;
    i: byte;
begin
write('s='); readln(s);
s1:=''; s2:='';
while (s[1]<>' ') do
      begin
      s1:=s1+s[1];
      delete(s,1,1);
      end;
i:=length(s);
while s[i]<>' ' do
      begin
      s2:=s[i]+s2;
      delete(s,i,1);
      dec(i);
      end;
s:=s2+s+s1;
writeln('s=',s);
readln;
end.
7
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 7,999
Записей в блоге: 1
07.11.2012, 15:30 3
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Var s,s1,s2:string;
    i:byte;
Begin
    write('Введите строку: ');readln(s);
    s1:=Copy(s,1,Pos(' ',s)-1);
    Delete(s,1,Pos(' ',s));
    s2:='';
    For i:=Length(s) downto 1 do
     if s[i]<>' ' then s2:=s[i]+s2
      else break;
    Delete(s,i,Length(s2));
    s:=s2+' '+s+' '+s1;
    writeln('Полученная строка = ',s);
    readln;
End.
7
1 / 1 / 0
Регистрация: 07.11.2012
Сообщений: 47
07.11.2012, 15:51  [ТС] 4
Большое спасибо. При много благодарен.
 Комментарий модератора 
Правило форума 3.6. Если какой-либо пост на форуме показался вам полезным, нажмите кнопку "Спасибо" внизу самого поста.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.11.2012, 15:51

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

Поменять местами первое и последнее слова в строке
Поменять местами в строке первое и последнее слова . Считать , что слова отделены друг от друга...

В каждой строке текстового файла поменять местами первое и последнее слова
В каждой строке текстового файла поменять местами первое и последнее слова. Очень нужна ваша...

Файл: в каждой строке поменять местами первое и последнее слова строки.
Создать текстовый файл F. Обработать файл следующим об-разом: в каждой строке поменять местами...

В строке, содержащей не менее двух слов, разделенных пробелом, поменять местами первое и последнее слова
Доброго времени суток! Кто может реализовать данное задание в Си? Строка – это правильное...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.