Código Delphi [-] for i:= 0 to 9 do for j:= 0 to 9 do FreeAndNil(Botellero[i,j]);
for i:= 0 to 9 do for j:= 0 to 9 do FreeAndNil(Botellero[i,j]);