Что будет выведено на экран в результате выполнения программы?

Program S;
Var x, y, i: Integer;
Begin
x := 2; y := 3;
While y>=0 do
begin x := x + 2; y:=y-2 end;
WriteLn \(‘x =’, x\);
End.

• 5
• 4
• 8
• 6