работа со строками Опции

[vjtr]

задан массив слов. объединить все слова в единую строку,разделяясоседние слова пробелом.
помогите решить!!! пожалуйста

[vjtr]

смотрите как я делала

   Program Zplata;
      uses wincrt;
      var f:array [1..10] of string[50];
      t:string;
      i,n:integer;
   begin
   	writeln('ââåäè n');
        readln(n);
   for i:=1 to n do begin
      write('f[',i,']=');
      readln;
   end;
   t:='';
 for i:=1 to n do begin
 t:=t+f[i];
          end;
writeln(t);
end.