Выделите операторы, образующие тело цикла.
(Var i, x: integer; ]
Begin
[ж: = 0:1
For i:=1 to 10 do
Begin
[Write();)
[x=x+i:1
end;
[Write(i))
End.​

578fyvhjj    1   30.04.2020 09:57    1