Решите! в тетрадях для контрольных работ необходимо записать условие , применить необходимые формулы для решения и записать ответ.13. изображение размером (количество точек на сантиметр) 60х30 имеет объем 300 байт, каков информационный вес одного пикселя этого изображения в битах? 14. автор получил рукопись от друга из ирландии, которая была записано буквами 64-символьного алфавита и содержала 2400 символов. достаточно ли 1гб памяти для хранения этой рукопись на диске. (в ответе необходимо найти информационный объем сообщения и ответить на поставленный вопрос в форме: ответ: ……. гб, нет не хватит или да хватит)15. информационное сообщение объёмом 750 битов состоит из 150 символов. какова мощность алфавита, с которого записано это сообщение. 16. реферат состоит из 32 листов, на каждом листе 120 строчек, содержащие по 50 символов в каждой. в кодировке unicode, каждый символ кодируется 16 битами информации. каков информационный объем файла в килобайтах? 17. файл размеров 5 мбайт передается через некоторое соединение за 16 секунд. определите размер файла (в кбайт), которое можно передать через другое соединение с утроенной скоростью за 10 секунд.
var
v:array[1..100] of integer;
i,j,n,b:integer;
begin
randomize;
write('vvedite razmernost'' massiva: '); readln(n);
writeln(' Ishodnii massiv '); writeln;
//Заполним массив случайными числами
for i := 1 to n do
begin
v[ i]:=random(100)-50;
write(v[ i]:4);
end;
writeln;
// организуем сортироваку от минимального
// к максимальному элементу массива
for i:=1 to n-1 do
for j:=i+1 to n do
if v[ i]>v[ j] then
begin
b:=v[ i];
v[ i]:=v[ j];
v[ j]:=b;
end;
writeln;
write(' Otsortirovannii massiv ');writeln;writeln;
write('ot min k max: ');writeln;
for i := 1 to n do
write(v[ i]:4); writeln; writeln;
write('ot max k min: '); writeln;
for i := n downto 1 do
write(v[ i]:4);
readln;
end.