Определите, что будет напечатано в результате работы следующей программы. Var k, і: integer;

Begin

k:= 1;

For і:= 1 to 3 do

k:= 3*k + 2*і;

Writeln(k);

End.

Мейвис00    2   30.04.2021 12:27    2