Пусть х - количество страниц в книге, тогда:
х*32*8=256*1024*8
х=(256*1024)/32
х=8192
function G(n: integer): integer; forward;
function F(n: integer): integer;
begin
if n = 1 then result := 1
else result := F(n - 1) - G(n - 1)
end;
function G(n: integer): integer;
begin
if n = 1 then result := 1
else result := F(n - 1) + 2 * G(n - 1)
end;
begin
Println(F(5)/G(5));//-2
end.
Var
x, a, s: real;
n, i: integer;
begin
write('Введите x и n ');
readln(x, n);
a := 1;
s := a;
for i := 1 to n do
begin
a := a * (-1) * x * x / (2 * i - 1) / (2 * i);
s := s + a;
end;
writeln('S = ', s:10:3);
end.
Cp-1251 - это 8-битная кодировка, т.е. один символ кодируется 8-ю битами, или одним байтом.
UNICONDE - это 16-битная кодировка, один символ кодируется 16-ю битами, или двумя байтами.
Таким образом сообщение длиной 35 символов занимало 35 байт в кодировке cp-1251, и после перекодировки стало занимать в два раза больше, то есть 70 байт.
Объем изменился на 35 байт.
Можно сам алгоритм? Без данных не сказать...