Dim a(10, 10) As Double Dim i As Integer, j As Integer Работа с матрицей n = 10 sub primer() For i = - id1226972320210302 от yakirill0109200 02.03.2021 20:34

Question

Информатика: Dim a(10, 10) As Double Dim i As Integer, j As Integer Работа с матрицей n = 10 sub primer() For i = 1 To n For j = 1 To n a(i,j)=(-1)^i*(2+j*fact(i,j)) ... end Sub function fact(i as integer,j as integer) As integer Как объявлять матрицу и как с ней работать

yakirill0109200 · Accepted Answer

1) 64*32/8/1024 = 0,25 кб; 1 / 0,25 = 4 бит пиксель; 2^4 = 16 цветов. 2) 50*80*(ln(16)/ln(2)) = 16000 бит; 16000 / 8 = 2000 байт. 3) 64*64*(ln(256)/ln(2)) = 32768 бит / 8 / 1024 = 4 кбайт минимум. 4) 2048*1536*3 байт пиксель = 9437184 байт / 8 / 1024 = 1152 кбайт. 5) (ln(256)/ln(2)) / (ln(2)/ln(2)) =8 раз меньше стал; (текущий уменьшенный вес файла + 70 байт) * 8 =~ 560 байт если весил 1 байт. 6) (ln(64)/ln(2)) / (ln(8)/ln(2)) = 2 раза. 7) (ln(1024)/ln(2)) / (ln(32)/ln(2)) = 2 раза. 8) 32*64/8 = 256;...

MOGZ ответил