В 8ричной системе 23435.
В 16ричной системе 10013.
Var s,i,c:integer;
begin
s:=0;
c:=1;
for i:=1 to 16 do begin
s+=c;
c*=2;
end;
writeln(s);
<span>end.</span>
===== PascalABC.NET =====
begin
var a := ArrRandom(5, -1, 1);
foreach var x in a do
Write(x:3)
end.
Значит нужно 1+2+3+3+4+5+6+7+8+9+10 = 55 си