В условии: "<span>Каждая его цифра записывается в двоичном </span><span>представлении, с добавлением ведущих нулей до длины 4, и к </span><span>получившейся последовательности дописывается сумма её </span><span>элементов по модулю 2"
Тут явно написано, что на кодирование собственно цифры идет 4 бита + 1 бит контрольный, всего 5 битов. А на 2 цифры, соответственно, в два раза больше.</span>
<span>§1 , 5км, « Евгений Онегин » тёмно – синий, следующий этап—редактирование, А. С. Пушкин, (г-жаПетрова), г.Красавино, 1941-1945г.г.
Дата неправильная. В это время Пушкин уже был метр, земля ему пухом.
Это Вторая Мировая Война. </span>
program zadanie;
var
a: array[1..99999] of real;
i,n: integer;
begin
randomize;
write('Введите число чисел массива: '); readln(n);
for i:=1 to n do
begin
a[i]:=1+random(5);
writeln('a[', i, ']=', a[i]);
end;
write('Номера элементов, совпадающих с первым элементом: ');
for i:=1 to n do if a[i+1]=a[1] then write(i+1:3);
writeln;
end.
<span>дают в результате нечетные числа</span>
<span><span>340547(8) x 14AC31(16) =115047 х </span><span><span>1354801</span></span><span><span>=155865790647</span></span></span>
<span><span>152643(7) x FB3071(17) =29823 x 22231445</span><span>=663008384235</span></span>
Можно реализовать через строки, но вы видимо только начали проходить Паскаль, поэтому такой вариант ;-)
