Ответ:
var i: integer;
begin
for i:=10 to 99 do
if (i mod 7 = 0) and (616 mod i = 0) then writeln (i)
end.
Визитка города2.история города3.дстопримичательности
Глубина цвета изображения i=I/k, где I- информационный объем изображения (бит), k- количество точек изображения.
Количество точек найдем умножив разрешение сканера на размер изображения:
k=(256*4)*(512*4)= 1024*2048
i=(6*1024*1024*8)/(1024*2048)= 24 бит
Ответ: 24 бит