<span>а) Ученик отвечает у доски. </span>
<span>б) Боря читает статью в журнале. </span>
<span>в) Оля слушает песню по радио. </span>
<span>г) Гена говорит с мамой по телефону. </span>
<span>д) Водитель автобуса объявляет остановку.</span>
4*2^x Кб = 16*2^10 Кб
4*2^x = 4*2^2*2^10
4*2^x=4*2^12
x=12
Если энциклопедия сохранена в юнекоде то там 1 символ равен 2 байтам. А у нас на странице символов на 13 килобайт.
1 килобайт равен 1024 байта.
13 килобайт равен 13312 байта.
13312 делим на 2 и получаем 6656 - это и есть наше количество символов на странице весом в 13 килобайт.
Просто, если логически подумать, то
<em>Белов -рыжеволосый</em>
<em>Чернов -беловолосый</em>
<em>Рыжов- черноволосый</em> :)
<h3>PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
function Fib(n: integer): integer;
begin
if n < 3 then Result := 1
else
begin
var (a, b) := (1, 1);
for var i := 3 to n do
(a, b) := (a + b, a);
Result := a
end
end;
begin
for var i := 1 to 10 do Fib(i).Print; // контрольный пример
end.
<h2>1 1 2 3 5 8 13 21 34 55 </h2>