обратный порядок слов Опции

[18192123]

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

А каков алгоритм такого преобразования?

[arhimag]

делая аналогию с предыдущими заданиями 18192123, то разделитель - только пробел.
вывод сделан из

у меня получилось разбить на слова первую строку, больше ничего не могу сделать...
не пойму, как сравнить со второй...( даже с использованием функции function _Pos(const subS, s: String): Integer)

Код

Function slovo ( const s : string; var i : byte) : string;
var
w : string;
begin
w := '';
while ( i <= length (s) ) and ( s[i] <> ' ' ) do
      begin
           w := w + s[i];
           i := i+1;
      end;
slovo := w;
end;

Сообщение отредактировано: arhimag - 6.01.2007 19:24