Сканер имеет разрешение 256x512 dp (точек на дюйм) отсканированное изображение размером 4х4 дюйма занимает 6 мбайт памяти. чему равна глубина цвета отсканированного изображения? ответ дайте в битах.

Глубина цвета изображения i=I/k, где I- информационный объем изображения (бит), k- количество точек изображения.

Количество точек найдем умножив разрешение сканера на размер изображения: 
k=(256*4)*(512*4)= 1024*2048

i=(6*1024*1024*8)/(1024*2048)= 24 бит

ответ: 24 бит

язык программирования питон

1)

import math;

r = int(input());

print(2 * math.pi * r);

print(math.pi * r ** 2);

2)

1.

import math;

a = float(input());

b = float(input());

print((math.sqrt(a) + math.sqrt(b)) / (math.sqrt(a ** 2 + b ** 2)));

2.

import math;

z = float(input());

y = float(input());

print((z * y) / (math.sqrt(z ** 3 + y ** 3)));

3.

import math;

x = float(input());

print(math.abs(x ** 2 - 2.4 * x + ((x + 1) / (x ** 2 + 2;

3) понял что надо среднее арифмитическое сделать из трех чисел, если что-то не так понял напиши.

a = float(input());

b = float(input());

c = float(input());

print((a + b + c) / 3);

4) не понял условие, перевод не понятный. Напиши если сможешь качественно перевести.

вариант Б тоже-самое что и 4 задание.

//PascalABC.Net 3.2
{1}
begin
var a:=readArrinteger('Вводите: ', readinteger('n ='));
write ('Ср. арифметическое: ', a.Average);
end.

{2}
begin
var a:=readarrinteger('Водите: ', readinteger('n ='));
var sum:=0;
for var i:=0 to length(a)-1 do if i.isodd then sum+=a[i];
write ('Сумма: ', sum);
end.

{3}
begin
var a:=readarrinteger('Вводите: ', readinteger('Кол-во элементов: '));
var otr:=0; var pol:=0;
for var i:=0 to length(a)-1 do if a[i]<0 then otr+=1 else pol+=1;
write('Массив: '); a.Println;
if otr=pol then write ('Отрицательных и положительных элементов равное кол-во') else 
if otr>pol then write('Отрицательных больше на ', otr-pol) else
write ('Положительных больше на ', pol-otr);
end.