Log2(16) = 4 бит
log2(2) = 1 бит
4/1 = 4 раза
21 кбайт * 4 раза = 84 кбайт был размер у того
===== PascalABC.NET =====
begin
var a := MatrRandom(3, 7, -99, 99);
a.Println(4);
Writeln;
var i := Range(0, 6).ToArray;
a := a.MatrSlice(Arr(0,1,2), i[:4] + i[5:]);
a.Println(4)
end.
Галочка вниз-дизъюнкция,это и есть сложение
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var x := ReadReal('x =');
var s := Cos(x);
for var i := 1 to n do
s += Cos(x + i);
s.Println
end.