При использовании 2 цветов для хранения одной точки изображения требуется log(2)2 = 1 бит.
Память для всего изображения = 800*600*1 бит = 800*600/8 байт = 60000 байт
Var
n,b,i,k,r:integer;
begin
readln(n);
for i:=1 to n do
begin
readln(b);
if b>=8 then
begin
k:=k+1;
r:=r+b;
end;
end;
writeln('Количество сдавших:',k);
writeln('Среднее значение:',r/k);
end.
Програмисты , разроботчики приложений и игр
Память находится в компьютере.
Солнце часть солнечной системы .
Автомобиль дороже велосипеда.
Колесо часть автомобиля.