1.
uses crt;
var i,n:integer;
A:array[1..4] of integer;
begin
n:=1;
for i:=1 to 4 do
begin
read(A[i]);
n:=n*A[i];
end;
writeln(n);
end.
var a:integer;
begin
readln(a);
writeln(a mod 10,a div 10 mod 10, a div 100)
end.
Var ar:array of integer;
i,n:integer;
procedure FirstPr(ar:array of integer;n:integer);
var i,k:integer;
begin;
for i:=1 to n do
if ar[i]<=25 then inc(k);
writeln(k);
end;
procedure SecPr(ar:array of integer;n:integer);
var i,k:integer;
begin;
for i:=1 to n do
if (ar[i]>=40) and (ar[i]<=50) then inc(k);
writeln(k);
end;
begin;
randomize;
readln(n);
setlength(ar,n+1);
writeln('Array');
for i:=1 to n do
begin;
ar[i]:=random(0,50);
write(ar[i]:4);
end;
writeln;
FirstPr(ar,n);
SecPr(ar,n);
<span>end.</span>
Посмотри в интернете про это там всё есть и сам придумай это легкооо
Рассчитаем объем памяти S. Для этого умножим количество пикселей на глубину кодирования i, глубину кодирования определим из формулы: N=2^i, где N- кол-во цветов
4=2^i i=2
S=300*200*2= 120000 бит
При двухцветной палитре:
2=2^i
i=1
Тогда количество пикселей при 2 цветной палитре = S/i = 120000/1= 120000 пикселей
Ответ: 120000 пикселей