lio con una asignación

[BrunoBsso]

Ya no hace falta ayudarte con la asignación, la que te pasó delphi.com.ar es la justa y necesaria.
Pero con el tema de la indentación yo sigo mi regla de lectura solamente:
Cada vez que agrupe código (ya sea entre un begin y end, o después de una estructura de control simple como IF o FOR, etc) cada renglón inmediato antes del final lleva una indentación.
Ejemplo:

Código Delphi [-]
begin
  //Indento
  //todo
  //lo que esté adentro
  if True then
    //Indento la única línea del if simple
  if True then begin
    //Indento todo
    //el begin
    //y el end
  end;
  for I:=1 to 10 do
    //Exactamente igual al IF anterior
  //Esto esta afuera del IF y del FOR, pertenece al primer BEGIN
  //así que lo indento
end;

Eso para cada conjunto de sentencias marcadas por un begin - end o una estructura de control (simple - de una sola línea - o compleja - con más de una lína, o sea con begin end).