1) Процессор выполняет 3*10243 элементарных операций в секунду. Сколько секунд потребуется процессору для обработки 120 Гбайт информации, если за одну элементарную операцию он может обработать машинное слово, объемом 64 бит? 2. Один лист информации в текстовом редакторе имеет объем 10 Кбайт и содержит 38 строк по 55 символа в каждой. Поместятся ли 73150 символа в 363520 байтах?
3. Вычислить: 1 Гбайт - 800 Мбайт. ответ записать в Кбайт.
4. MP3 плеер имеет жесткий диск объемом 40 Гбайт. Сколько часов воспроизведения звуковой информации поместится на данный носитель информации, если одна песня имеет объем 4 Мбайт и звучит 3 минуты.
5. Флэш-карта имеет объём 512 Мбайт. Рукопись автора содержит 2000 страниц. На каждой странице 80 строк, в каждой строке 100 символов. Каждый символ кодируется 16 битами. Кроме того, рукопись содержит 80 иллюстраций, объёмом 5 Мбайт каждая. Поместится ли рукопись на флэш-карту в несжатом виде, и каков ее объём в мегабайтах? В задаче принять
1) не поместится, 523 Мбайт;
2) поместится, 432 Мбайт;
3) не поместится, 612 Мбайт;
4) поместится, 512 Мбайт
6. Компьютер имеет оперативную память 512 Мбайт. Количество соответствующих этой величине бит больше:
1) 10 000 000 000 бит; 2) 8 000 000 000 бит; 3) 6 000 000 000 бит; 4) 4 000 000 000 бит
1гбайт=1024мбайт
1мбайт=1024кбайт
1кбайт=1024байт
иногда для упрощения пересчета используют не 1024, а 1000.
рассчитаем если 1024:
3.4мб=3481,6кбайт
3481,6+1364=4845,6кбайт
4845,6кбайт * 1024 = 4961894,4 байт
5.7гб=5836,8мб
5836,8+4537=10373,8 мбайт=10622771,2 кбайт
6341кб=6493184байт
6493184байт+3842байт=6497026 байт
2.5кб=2560байт
6497026 байт*2560 байт= 16632386560 байт
можно перевести учитывая не 1024, а 1000 по этому же принципу, циферки будут попроще немного
const
n = 5;
m = 5;
var
a: array[1..n, 1..m] of integer;
i, j: integer;
function check(i: integer): boolean;
var j: integer;
begin
check := false;
j := 0;
repeat
inc(j);
if a[i, j] < 0 then
begin
check := true;
exit;
end;
until j = m;
end;
function search: integer;
var i: integer;
begin
search := 0;
i := 0;
repeat
inc(i);
if not(check(i)) then
begin
search := i;
exit;
end;
until i = n;
end;
begin
writeln('Введите матрицу ', n, 'x', m,': ');
i := 0;
repeat
j := 0;
inc(i);
repeat
inc(j);
read(a[i, j]);
until j = m;
until i = n;
writeln('ответ: ', search);
end.
Пример работы программы:
Введите матрицу 5x5:
3 4 2 3 -2
3 -5 -7 -2 1
8 2 5 4 -4
0 1 2 3 4
1 7 2 -5 2
ответ: 4
* Примечание: Если во всех строках есть отрицательные элементы, то ответ будет 0 (можно изменить в самой процедуре)