Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Приблизительно ≈0,643656
program xxx;
var i, n : integer;
a, s : real;
b : array [1..20] of real;
begin
writeln('введите число а=');
readln(a);
writeln('введите размерность массива n=');
readln(n);
write('введите элементы массива b: ');
for i: =1 to n do
readln(b[i]);
writeln('исходный массив b: ');
writeln(b[i]);
s: =0;
if b[i] > a then s: =s+b[i];
writeln('сумма элементов =', s);
readln
end.
значит так, используем единственную в информатике формулу
n=2^i
n-это количество символов в алфавите, значит n=64
64 это 2 в 6 степени, значит i=6 - это информационный объем одного символа, а нам надо найти информационный объем 3072 символа, значит
6*3072 = 18432 бита = 2304 байта
Популярные вопросы