Преобразование массива в строку В Pascal

[eXploiD]

Нужно в Turbo pascal преобразовать массив, состаящий из слов, в одну строку.
Вроде примитив, а сделать не получается.
Помогите пожалуйста.

[Naked]

ну так делаешь цикл
for i:=1 to n do begin
str := str + mass[i];
end;
Я точно не помню - в Паскале строки можно складывать или нет... Возможно вместо + там . или |, но вроде +

[Ghost]

The_naked
Плюс там юзается. Немножко дополню, как бы я это делал:

function arr2str (inp: array of string): string;
var
  i: integer;
  s: string;
begin
  s := '';
  for i := 1 to sizeof (inp) div sizeof (string) do begin
    if s <> '' then s := s + ' ';
    s := s + inp[i - 1];
  end;
  arr2str := s;
end;

var
  str: array [1..3] of string;

begin
  str[1] := 'qwerty';
  str[2] := 'asdf';
  str[3] := 'zx';
  writeln (arr2str (str));
end.

Можно отсюда выковырнуть функцию arr2str и юзать, где надо.

[eXploiD]

Не знаю почему, но вариантThe_naked
я пробовал сам, не работало.
А вот Ghost подкинул полностью удовлетворяющую меня функцию, хотя алгорит впринципе один и тот же.
Спасибо! Проблему решил!