...........................
Var
n, max, i, d: integer;
begin
readln(n);
max := 0;
for i := 1 to n do
begin
readln(d);
if (d mod 10 = 9) and ((max < d) or (max = 0)) then
max := d;
end;
writeln(max);
end.
Количество различных значений температуры = 30-15+1 = 16. Для записи одного значения требуется log(2)16 = 4 бита.
Общий объем измерений = 60*3*4 бит = 720 бит = 720/8 байт = 90 байт
<span>Дано: N=800</span><span>
K=320</span>
<span>Найти: I=?
</span><span>Решение: </span>
I=i×K
<span> N=2i</span><span>
800=</span>2^i
<span> 2^9=512</span>
<span> 2^10=1024</span>
<span> 800 > 2^9</span>
<span> 800 < 2^10 Т.к. нет точного числа i берём близкие по значению и выбираем
то, которое больше N.</span>
<span>I=10 × 320=3200
бит = 400 байт.</span>
<span>Вроде так.</span>
Последовательность.
Блин, это просто, он это будет делать по цепочке, как и перечислила его мать.