Что будет выведено на экран в результате выполнения программы?
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