Строки, слова в предложениях Опции

[Tribunal]

нужно найти самое короткое слово в первом предложении, которого нет во втором предложении.
а также в обоих предложениях удалить символ # и удвоить символ +.

подскажите хотя бы,с чего начать.

[Tribunal]

еще вот такой недоработанный вариант выделения искомого слова

Код

begin
   n1:=GWords(p1,w1);
   n2:=GWords(p2,w2);
   m:=0;
   min:=length(w1[1]);
   while i<=n1 do begin
   if length(w1[i])<min then begin
                        min:=length(w1[i]);
                        inc(m);
                        w3[m]:=w1[i];
                        end;
   if m=0 then begin
          inc(m);
          w3[m]:=w1[1];
          end;
   end;
   while i<=n2 do begin
    while j<=m do begin
     if w3[j]<>w2[i] then writeln(w3[j]);
     inc(j);
    end;
    inc(i);
   end;

end;