Описать последовательно, что выполняет данная программа, подробно. const m=5; n=5; var r: array[1..m, 1..n] of integer; i, j, c, d, k: integer; l: boolean; begin randomize; writeln('исходная матрица: '); for i: =1 to m do begin for j: =1 to n do begin r[i, j]: =random(15); write(r[i, j]: 4); end; writeln; end; write('c= '); read(c); write('d= '); read(d); writeln('строки, в которых есть число: ', c); k: =0; for i: =1 to m do begin l: =false; j: =1; while(j< =n)and not l do if r[i, j]=c then l: =true else j: =j+1; if l then begin k: =1; write(i, ' '); for j: =1 to n do r[i, j]: =r[i, j]*d end; end; writeln; if k=0 then writeln('в матрице нет числа: ', c) else begin writeln('преобразованная матрица: '); for i: =1 to m do begin for j: =1 to n do write(r[i, j]: 4); writeln; end; end; end.
Ответы
В годном гигабайте 1 073 741 824 байт т. е. * 8 бит. 234 бита/8 = 30 байт, т. е. до гигабайта ещё как до Альдебарана! =))
С 233 сообщениями по 1 биту, если вы это имели ввиду, дело обстоит сложнее, т. к. это смотря где они лежат (если каждое в отдельном файле, то минимальный размер одного файла на диске физически зависит от размера кластера в таблице разделов, а это от 256 байт до нескольких килобайт, т. е. сперва надо выяснить характеристики носителя информации, где они будут лежать и умножить потом на размер кластера).
С 233 сообщениями по 1 биту, если вы это имели ввиду, дело обстоит сложнее, т. к. это смотря где они лежат (если каждое в отдельном файле, то минимальный размер одного файла на диске физически зависит от размера кластера в таблице разделов, а это от 256 байт до нескольких килобайт, т. е. сперва надо выяснить характеристики носителя информации, где они будут лежать и умножить потом на размер кластера).
2 бита в двоичной системе дают 4 возможных комбинации. То есть вероятность извлечения белого шара 1/4, то (исходное целое делим на количество комбинаций) . Таким образом, получаем, что всего шаров: белых - одна часть, а чёрных - три. То есть белых шаров в 3 раза меньше: 18 / 3 = 6 (штук) .
А всего шаров:
18 чёрных + 6 белых = 24
или
Пусть в корзине всего x шаров, тогда среди них x-18 белых.
Вероятность того, что из корзины будет вынут белый шар равна P=(x-18)/x
Количество собственной информации равно I=log2(1/P)=log2(1/(x-18)/x))=log2(x/(x-18))
Отсюда
log2(x/(x-18))=2
x/(x-18)=2^2
x=4x-72
x=24 шара
А всего шаров:
18 чёрных + 6 белых = 24
или
Пусть в корзине всего x шаров, тогда среди них x-18 белых.
Вероятность того, что из корзины будет вынут белый шар равна P=(x-18)/x
Количество собственной информации равно I=log2(1/P)=log2(1/(x-18)/x))=log2(x/(x-18))
Отсюда
log2(x/(x-18))=2
x/(x-18)=2^2
x=4x-72
x=24 шара
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
2. Матрица выводится на экран.
3. Спрашивается, какое число необходимо найти в матрице (с).
4. Спрашивается, во сколько раз (d) необходимо увеличить строки матрицы, содержащих число с.
5. Результат выводится на экран.