Может это не 2 степень, а просто знак, что это число записано в двоичной системе исчисления? так 11101 тут всего 5 цифр и 5 разрядов, разряды считаются с нулевого: 11101=1*2^4+1*2^3+1*2^2+0*2^1+1*2^0= 16+8+4+1=29
Const n=10; m=5; var a:array[1..n,1..m+1] of integer; i,j,k,sp,s:integer; begin Randomize; writeln(' Результаты соревнований'); for i:=1 to n do begin s:=0; for j:=1 to m do begin a[i,j]:=random(50)+50; write(a[i,j]:4); s:=s+a[i,j]; end; a[i,m+1]:=s; writeln(s:5); end; write('k='); readln(k); sp:=0; for i:=1 to n do if a[i,m+1]>=k then sp:=sp+1; writeln('sp=',sp); end.
так
11101
тут всего 5 цифр и 5 разрядов, разряды считаются с нулевого:
11101=1*2^4+1*2^3+1*2^2+0*2^1+1*2^0= 16+8+4+1=29