// PascalABC.NET 3.1, сборка 1250 от 28.05.2016 begin var a:=MatrixRandom(3,2,-99,99); Writeln('Массив А'); for var i:=0 to 2 do begin for var j:=0 to 1 do Write(a[i,j]:4); Writeln end; var b:=MatrixRandom(3,2,-99,99); Writeln('Массив B'); for var i:=0 to 2 do begin for var j:=0 to 1 do Write(b[i,j]:4); Writeln end; var c:array[0..2,0..1] of real; Writeln('Результирующий массив'); for var i:=0 to 2 do begin for var j:=0 to 1 do begin c[i,j]:=a[i,j]*b[i,j]/10; Write(c[i,j]:7:1) end; Writeln end end.
Тестовое решение Массив А -91 -93 -62 9 -97 6 Массив B -64 18 57 -34 -65 -30 Результирующий массив 582.4 -167.4 -353.4 -30.6 630.5 -18.0
N= 2^{i}
"N" - мощность алфавита.
информационный вес символа алфавита "i"
#1. N=2 в степени i
Так как N=32, отсюда следует, что i=5 битам.
#2. По аналогии выше. Только теперь N=8. А 8 - это 2 в степени 3.
то есть i=3. 3 бита.
#3. 64 символа. (смотреть задачу 1). 2 в 6 степени.
#4. Определим, сколько бит занимает все сообщение.
1/512 Мбайт = 1024/512 = 2 Кбайт. (1 Мбайт = 1024 Кбайт);
2 Кбайт = 2 * 1024 = 2048 байт (1 Кбайт = 1024 байт);
2048 байт = 2048 * 8 = 16384 бит.
Текст состоит из 2048 символов ⇒ занимает 16384 бит ⇒ один символ занимает 16384 : 2048 = 8 бит = 1 байт.
Если для хранения 1 символа алфавита используют 8 бит, согласно формуле (смотреть выше) 2 ^ 8 = 256 символов.
ответ: размер алфавита - 256 символов.