Паскаль для циклов внутри повторяющихся циклов

вы все до сих пор так помогли, так что вот еще одна неприятная проблема для тебя!

У меня есть простая игра в угадывание слов, написанная на Паскале для консоли в Delphi 7, где предположения (правильные или неправильные) хранятся в фиксированном массиве с именем "предположения". Теперь мне нужно проверить, чтобы посмотрим, догадались ли они уже об этом письме. У меня есть следующий код ...

Write ('Guess a letter: ');
Readln (guess);
Guess := UpCase(Guess);
repeat
  for i := 1 to 20 do
  begin
    if guess = guesses[i] then
      begin
        guessed := true;
      end
    else begin
      guessed := false;
    end;
  end;
until (guessed = true) or (i = 20) ;

Моя проблема в том, что он следует за циклом for 20 раз и должен заканчиваться, так как это первая буква, а не в массиве "guesses", но повторяется. после того, как цикл for был выполнен 20 раз и не было найдено ни одной буквы с предположением, он должен завершиться с логическим значением "guested" как false.

Заранее благодарим за помощь!