Обработка строк посматрите паскаль

[zizu]

1) Преобразовать строку так, чтобы буквы каждого слова в ней были отсортированы по алфавиту


как обычно надеюсь на вашу помощь...

[Grag]

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

[zizu]

а невтягость тебе будет написать бо я дуб дубом вот и пологаюсь на вашу помощь..

[IT-man]

а невтягость тебе будет написать

не в тягость--стучите - аська под ником-недорого!

[Grag]

Вот так можно строку разбить на слова...

Const
  prpChar=['.',',',':',';','?','!','-',' ']; {символы разделители}
Var
  Line,stword:string;		{строка и слово в строке}

Begin
      poz:=1;
      while poz<=Length(Line) do
        begin
          stword:='';
          pozbgn:=poz;
          while (poz<=Length(Line)) and (not(Line[poz] in prpchar)) do
            begin
              stword:=stword+Line[poz]; 	{выбираем очередное слово из строки}
              Inc(poz)
            end;
           {вот здесь имеем слово из строки и можно делать в нем сортировку символов по алфавиту}
          Inc(poz)
        end;

Если хочешь получить полностью рабочую программу с исходниками, обращайся, договоримся.
Контакты:
e-mail: skiper@rol.ru
icq: 585281783
Skype: delmas61

[Stilet]

А что поиск уже не в моде?
http://www.programmersforum.ru/showt...749#post396749

[zizu]

так мне ее надо решить с помошью подпрограммы...