Program mm; var a:array[1..12] of integer; begin for i:=1 to 12 do begin а[1]:=5; а[2]:=4; а[3]:=-3; а[4]:=1; а[5]:=0; а[6]:=-4; а[7]:=(у тебя не написано); а[8]=25; а[9]=-8; a[10]=-5; а[11]=-17; а[12]=-1; end; writeln('Вот исходный массив'); for i:=1 to 12 do writeln('A[',i,']=',a[i]); for i:=1 to 12 do begin if (A[i]<0) then a[i]:=1; if (a[i]>0) then a[i]:=-5; end; writeln('Вот полученный массив'); for i:=1 to 12 do writeln('A[',i,']=',a[i]); writeln(' Введите 12 чисел'); for i:=1 to 12 do readln(A[i]); (это доп оценка) end.
Объяснение:
1.
a = 3
b = 15
c = 7
I - ?
K = a*b*c=3*15*7 = 315 символов
Если информационный вес i = 8 бит, то
I = k*i
I = 315*8 бит = 315 байтов
ответ: Объём в 315 байтов займёт текст в оперативной памяти.
2. Решение:
1. Количество точек -225
2. Так как всего 2 цвета черный и белый. то глубина цвета равна 1 ( 2^1 =2)
3. Объем видеопамяти равен 225*1=225 бит
3. V=2Int,где 2-стерео,I - разрядность карты, n - частота дискретизации, t - время звучания.
Значит V=2*8*1000*3=48 000 бит,делим на 8, это 6000, а затем на 1024 - 5,86 Кбайт
4. Для хранения информации об одной точке необходимо 4 бита. Так как 16= 2^4. найдем общее количество бит:
64*32*4=8192 бит
В байтах получим 8192/8 = 1024 байт