Короче, берешь число в восьмеричной системе счисления, например, - 125
потом пишешь над каждым разрядом цифры справа на лево, потом выносишь число из разряда и умножаешь на 8 в степени номера этого числа
const n=10;
var a:array [1..n] of integer;
i,x:integer;
begin
write('Массив: ');
for i:=1 to n do
begin
a[i]:=random(11)+10;
write(a[i]:3,' ')
end;
writeln;
write('x = ');
readln (x);
for i:=1 to n do if a[i]=x then writeln('A[',i,'] = ',a[i])
end.
64*40*48*8=983040 бит /8/1024 = 102 КБ
Ответ: 3.
<span>АНКЛАН, в переводе с чукотского - это просто "люди", а пасти оленей в тундру - чауча "люди, у которых есть олени" (отсюда и пошло название чукча) .</span>