2,5 Мбайта = 2,5*1024 Кбайт = 2,5*1024*1024 байт
16 бит = 16/8 байт = 2 байта
Количество страниц = 2,5*1024*1024 / (640*480*2) ≈ 4,3 ≈ 4
Ответ: 4
<span>передачу информации по заданному адресу</span>
7*36*50=12600 - всего символов
2^i=64 => i=6 бит - занимает один символ
12600/6=75600 бит = 9450 байт - объем сообщения
на Pascal
program noname;
uses crt;
const
t=10;
var
a:array[1..t] of byte;
i,k:byte;
x,n:integer;
r:real;
begin
clrscr;
randomize;
x:=1; k:=0; n:=0;
for i:=1 to t do begin
a[i]:=random(20-1+1)+1;
if (a[i] mod 2=0) then x:=x*a[i]
else begin n:=n+a[i]; k:=k+1; end;
writeln ('a[',i,']=',a[i]);
end;
r:=n/k;
writeln ('произведение элементов с четным значением=', x);
writeln('ср.арифм. элементов с нечетным значением=',r);
end.
Dim b(4,2)
for i=1 to 4 step 2
for j=1 to 2
b(i,j)=int(RND*10-8)
print b(i,j);
next j
print
next i
kol=0
for i=1 to 4 step 2
for j=1 to 2
if b(i,j) mod 3=0 then
kol=kol+1
end if
next j
next i
print kol