1024 Кб = 1024×1024 байта
1 бит = 1/8 байта
1 Кб = 1024 байта
В порядке убывания: 1024 Кбайта, 1 Кбайт, 1000 байт, 1 байт, 1 бит
<em>
</em><em />В приведенной последовательности ошибка, там не 18, а 17.
<em>
// PascalABC.NET 3.2, сборка 1363 от 17.12.2016</em><em>// Внимание! Если программа не работает, обновите версию!</em>begin
var a,b,c,d:integer;
(a,b,c):=(1,1,1);
Print(a,b,c);
for var i:=1 to 20 do begin
d:=a+b+c; Print(d);
(a,b,c):=(b,c,d)
end;
Writeln
end.
<u>Результат</u>1 1 1 3 5 9 17 31 57 105 193 355 653 1201 2209 4063 7473 13745 25281 46499 85525 157305 289329
10 50 true
8 45 true
6 40 true
4 30 true
2 25 true
0 20 false
k:=10;
t:=50;
while k>1 do
begin
k:=k-2;
t:=t-5;
end;
write(k,n);
<span> по-моему, ответ - Г.</span>
<span>128 с - (1024 * 64 / 100) м</span>
<span>x c - 100 м</span>
<span>x = (128 * 100 * 100) / (1024 * 64) = 19.53</span>