За­пи­ши­те зна­че­ние пе­ре­ме­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты про­грам­мы. Var u,i: integer;

Begin

u := 40;

For i := 1 to 6 do

u := u – i;

Writeln(u);

End.

АндрейTV1    3   16.10.2020 09:33    1