Program hhh54;
var i,n,x:longint;
a: array [1..100000] of longint;
begin
read (n);
a[1]:=1;
a[2]:=1;
for i:= 3 to n do
begin
a[i]:=a[i-1]+a[i-2];
write (a[i]);
end;
end.
1) 65536 = 2¹⁶ 16=2⁴
до преобразования для кодирования одной точки требовалось 16 бит, а после преобразования - 4 бита
16/4 = 4
Ответ: в 4 раза уменьшился объем используемой памяти
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
var a:=ArrRandom(10,10,99); a.Println;
a.Reverse.Println
end.
<u><em>Тестовое решение:</em></u>
39 29 38 59 16 60 41 73 76 52
52 76 73 41 60 16 59 38 29 39
Ответ:
1600
Объяснение:
100Мбит - это 100*2^10 бит
1 МБ - это 2^13 бит
128с - это 2^7с
K(объём)=V(скорость)*t(время)
Решение: K=(100*2^10*2^7)/2^13=100*2^4=1600MB