Var a:byte;
begin
write ('<span>x+y=a+b');
end.</span>
===== PascalABC.NET =====
begin
var k := ReadInteger; // ввод k
if k > 2 then // анализ аномалии
begin
var (x1, x2, i) := (1, 1, 2);
var x: integer;
while i < k do
begin
x := x1 + x2;
x1 := x2;
x2 := x;
i += 1
end;
Print(x)
end
else
Print('Ошибка')
end.
1) Высчитаем суммарное количество символов: 32*64*8=16384 (символа)
2) Высчитаем суммарное количество бит: 16*16384=262144 (бит)
3) Переводим биты в байты (1 байт = 8 бит): 262144/8=32768 (байт)
4) Переводим байты в килобайты (1 КБ = 1024 Б): 32768/1024=32 (килобайта)
Ответ: <u><em>32 КБ</em></u>
N = 110
K = 72
I = ?
N = 2^i
110 = 2^i
i = 7 бит (ближайшая степень после числа 110)
I = K * i
I = 72* 7 = 504 бит = 504/8 байт = 63 байта
ответ: б.
<span>С развитием компьютерной техники появился новый уникальный метод исследования -- компьютерный эксперимент. </span>