===== 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.
Бит - минимальная еденица
569(9)=5103
26705(16)=427280
а второе я хз:D
Калькулятор чё за вопросы?
3 мб
512×2=1024
1024×2=2048
1024+2048=3072
переводим в мб и получим 3 мб