1/16кб=64 байта =
64/2=32 байта 1 страница
32 байта = 512 бит
512/256=2
1 символ =2 бита
2^2=4 символа мощность алфавита
Задание 1
1)
1024*768=786432 пикселей всего<span>
</span>2) 32=2^5 => 5 бит - 1 пиксель<span>
<span>3)
786432*5=3932160 бит = 491520 байт = 480 Кбайт
Задание 2
1) 120*150=18000
2) 2=2^1 => 1 бит - 1 пиксель
3) 18000*1=18000 бит = 22500 байт</span></span>
option explicit
dim s,k,i,j,max,min,a
privat sub cmdstart_click()
pic1.cls
redim a(1 to 5,1 to 3)
pic1.scale(0,0)-(5+1,3+1)
randomize:pic1.forecolor=vbblue
for i=1 to 5
for j=1 to 3
a(i,j)=int(rnd*100):pic1.currentx=j
pic1.currenty=i:pic1.print a(i,j)
next
next
max=a(1,1)
min=a(1,1)
for i=1 to 5
for j=1 to 3
if a(i,j)>max and a(i,j)<min then
end if
next
next
pic1.forecolor=vbred:pic1.print max, min
end sub
F = true. А вообще, это можно набрать в паскале и проверить)