A respeito do desenvolvimento de algoritmos implementados...

A respeito do desenvolvimento de algoritmos implementados em linguagem Delphi para manipulação de estrutura de dados, julgue os itens a seguir.

O código seguinte está sintaticamente correto e implementa um algoritmo que permite contar o número de vogais em um string chamado S.

function CountVowels(const S : string) : integer;

var

       i : integer;

begin

      Result := 0;

     for i := 1 to length(S) do

           if upcase(S[i]) in ['A', 'E', 'I', 'O', 'U'] then

                 inc(Result);

end;