Определите, что будет напечатано в программе:

Var i, x:integer;
Begin
x:=2;
for i:=100 to 1000 do x:= - x;
write (x);
End.

Aruzhankaaaaa1    2   14.04.2020 09:22    23