Толық емес байланыс деген не

2. Шаг 1. Выбор типа диаграммы.
Шаг 2. Задание исходных данных диаграммы.
Шаг 3. Задание параметров диаграммы.
Шаг 4. Размещение диаграммы.
4.Биржевая диаграмма — это диаграмма, специально созданная для работы с финансовыми или научными данными, в которой на каждую точку данных приходится до четырех значений. Эти значения сравниваются со значениями максимума, минимума, открытия и закрытия, используемыми для отображения биржевых данных. В этом типе диаграммы значения открытия и закрытия отображаются с маркеров (обычно это линии или треугольники). В следующем примере значения открытия помечены маркерами слева, а значения закрытия — маркерами справа.
1и3 к сожелению не знаю...

Var
  S, tmp, buf, firstW: string;
  i, j, k, p, ii: integer;
  ch: char;

begin
  S := 'privit    kak   dela  putin    znanija   test  proverka   privit  teste.';
  firstW := copy(S, 1, pos(' ', S) - 1);
  writeln('Исходная строка: ', S);
  writeln('Первое слово = ', firstW);
  i := 0;
  while (S[i] <> '.') do
  begin
    i := i + 1;
    if (S[i] <> ' ') then
    begin
      while ((S[i] <> ' ') and (i < Length(S))) do
      begin
        tmp := tmp + S[i];
        i := i + 1;
      end;
      buf := tmp;
      p := 0;
      ii := 1;
      while ii <= Length(buf) do
      begin
        k := 0;
        ch := buf[ii];
        for j := Length(buf) downto ii do
          if buf[j] = ch then
          begin
            k := k + 1;
            delete(buf, j, 1);
          end;
        if k > 1 then
          p := 1;
      end;
      if ((p <> 0) and (tmp <> firstW)) then
        writeln(tmp);
      tmp := '';
    end;
  end;
  readln;
end.