Для заданного числа n составьте программу для вычисления
s = 1*2*3 *n​

pascalabc.net

begin

  var n : = readinteger('n =');

  var p : = biginteger.one;

  for var i : = 1 to n do

    p *= i;

  writeln(n, '! = ', p)

end.

209,35 Кбайт

Объяснение:

Дано:

N = 128 символов (количество букв в алфавите)

K = 100 страниц * 35 строк * 70 символов в строке = 245 000 символов в книге

Найти:

I

N = 2^i где

N - мощность алфавита (количество символов в алфавите)

i - количество бит для кодирования 1 символа (информационный вес символа)

^ - знак степени

128 = 2^i

i = 7 бит (подбор, знание степеней двойки)

I = К * i где

I - информационный объём текста

K - количество символов в тексте

i - количество бит для кодирования 1 символа (информационный вес символа)

I = 245 000 * 7 = 1 715 000 бит

I = 1 715 000 бит = 1 715 000 / 8 = 214 375 байт = 214 375 / 1024 ≈ 209,35 Кбайт

1 байт = 8 бит

1 Кбайт = 1024 байт