Al no decir el uso de las variables, solo puedo conjeturar, pero, ¿no te vale un array?
Código Delphi
[-]
const var1 = 10;
const var2 = 11;
const var3 = 12;
var tabla:array[10..80] of integer;
i:integer;
begin
for i:= low(n) to High(n) do
tabla[i] := 0;
end;
Si quieres guardar -1 en la variable 3, harías un Tabla[var3]:= -1
Realmente los valores los guardas en el array, pero te ayudas con las constantes, para saber a qué indice de la tabla tienes que ir.
Un saludo