program delin;
const
nn = 100;// максимальный размер массива
var
i, j, n, t: integer;
a: array[1..nn] of integer;
begin
write('n = ');
read(n);
randomize;
for i := 1 to n do
begin
a[i] := random(38) - 9;
write(a[i], ' ');
end;
writeln;
for i := n - 1 downto 1 do
for j := 1 to i do
if a[j] > a[j + 1] then
begin
t := a[j];
a[j] := a[j + 1];
a[j + 1] := t;
end;
for i := 1 to n do
write(a[i], ' ');
end.
<em>Образ мыши на экране - </em><u>курсор</u>
1 байт = 8 бит
128 000 бит делим на 8 = 16000 байт/сек.
Дальше
1 Кб = 1024 байта
250 Кб х 1024 байта = 256 000 байт
Делим их на скорость (16 000 байт за сек)
и получаем 256000/16000 = 16 сек.
Мигает, движется, слушать дает (телефон) .
<span>хвост длинный, а сама масявка, пользы мало если не в "связи" с чем-то (мышь) . </span>
<span>и не картотека и не библиотека, а все знает о многих (записная книжка) </span>
<span>все укроет - сбережет, а не холодильник. (дискета) </span>
рано поднимает, до вечера донимает (школа) .
16 байт = 16*8 бит = 128 бит