Что будет выведено на экран в результате выполнения программы?
Program S;
Var x, y: Integer;
Begin
x := 2; y := 3;
x := 2*x *x;
y :=x mod y;
x := x + y;
WriteLn (‘x =’, x);
End.
10
8
6
1