В результате выполнения в Delphi программного кода a:=3; Repeat a:= a-3 until a=3; для переменной "a" целого

В результате выполнения в Delphi программного кода a:=3; Repeat a:= a-3 until a=3; для переменной "a" целого
типа получим
Ответы: 1). значение a равное 0 2). значение a равное 3 3). значение a равное 1 4). "бесконечный" цикл