1110011=1*2^6+1*2^5+1*2^4+1*2^1+1*2^0=115
564=5*8^2+6*8^1+4*8^0=372
9B=9*16^1+11*16^0=155
1101101=1*2^6+1*2^5+1*2^3+1*2^2+1*2^0=109
35=3*8^1+3*8^0=27
5D=5*16^1+13*16^0=93
Const N = 50;
var a: array[1..N] of integer;
sum, i: integer;
begin
sum := 0;
a[ 1 ] := 1;
for i := 2 to N do begin
a[ i ] := a[ i - 1 ] + 4;
sum := a[ i ] + sum;
end;
for i := 1 to N do
writeln('A[ ', i, ' ]: ', a[ i ]);
writeln;
writeln('Сумма элементов массива: ', sum);
writeln('Значения 10, 20, 30, 40 элементов, стоящих в нечетных позициях: ' );
writeln('A[ 13 ] = ', A[13],', A[ 25 ] = ', A[25], ', A[ 37 ] = ', A[37], ', A[ 49 ] = ', A[49]);
<span>end.</span>
1 - в
2 - в
3 - б (если только текстовый редактор - не стандартный блокнот)
4 - б
5 - а
6 - в
7 - а
8 - б*