hola más o menos así sería:
Código Delphi
[-]
var
I, formula: integer;
resultante: array[1..255] of integer;
begin
for I := 1 to 255 do begin
formula := 2 * I + 1;
resultante[i] := formula
end;
resultante es el array que contiene los números impares.., no está del todo perfecto, ni siquiera tengo el delphi a mano xD pero obtinene los primeros 255 impares