1. Размер фото 6*8= 54 см кв
2. 54*900= 48600 точек
3. 48600*3= 145 800 бит = 18225 байт
//PascalABC.NET 3.2 сборка 1318
Const
n=5;
Var
ar:array[1..n] of integer;
i,indf:integer;
begin
indf:=-1;
for i:=1 to n do
begin
readln(ar[i]);
if not(odd(ar[i])) then indf:=i;
end;
if indf=-1 then
writeln('Нет чётных')
else
begin
for i:=indf to n-1 do
ar[i]:=ar[i+1];
for i:=1 to n-1 do
write(ar[i]:4);
end;
end.
Пример ввода:
1 2 3 4 5
Пример вывода:
1 2 3 5
256 Кбайт = 256*1024 байт = 256*1024*8 бит
Память для одного пикселя = 256*1024*8/(1024*512) = 4 бита
Число цветов = 2^4 = 16