4 года назад

Размер изображения 25×25 см сканер :разрешающая способность 600 dpi найти размер файла если изображение МОНО ×РАМНОЕ

1 ответ:

альбинатес20064 года назад

0 0

Дано Разрешающая способность сканера 600 х 600 dpi. Размер 10см х 15см. Глубина Цвета 3 байта. Найти: Каков информационный объем этого файла? Решение Вначале переводим глубину цвета из байт в биты 3 байта 8биТв байте 24 бит вычисляем разрешение сканера в 1 дюйме квадрат 600600 360 000 пикселей в 1 дюйм Переводим размер картинки из квадратов Сантиметров в Квадратные дюймы 10см 3.937дюйма 15см 5,906 дюйма 1015-150 смл2-3,937 5 906 23,25 дюйм Вычисляем в разрезе 23,25 дюймл2 360 000 пикселей в 1 дюйм 2E 8 370 000 пикселей Информационный объем вычисляем по формуле КОЛИЧЕСТВО ПИКСелей глубину цвета 8 370 000 пикселей 24 биTE 200 880 000 бит. lереводим в бай Ты делением На 8 25 110 000 байт или же делим на 10241024 чтобы получить количество мегабайт 23,95 мегабайт Ответ: Информационный объем отсканированного изображения или 23,95 Мегабайт

Читайте также

Помогите!!! Братцы!!! прощу по-человечески

Сергей 134 [7]

1. 1 2 3 4
(WiFi как радиоволна, плюс dialup)
2. 2 3 4 5
3. 1 4 5
4. 1 3
6. 1 2 3 5
(Сис админ не обязан разрабатывать ПО)

0 0

4 года назад

Решите примеры плизз 1111+1 1011011010+1011101110 10011*11011 111*11

Ksenuy

1 1112
2 2022112120
3 110131121
4 1221

0 0

4 года назад

Прочитать ещё 2 ответа

Паскаль АВС. Дан массив из C чисел. Определить в нём самое маленькое положительное число.

Vadikkk

Const
N = 10; //Задаём размерность массива
Var
A: array[1..N] of integer; //Объявляем массив
i, B: integer;
Begin
Randomize;
Write('Исходный массив:');
For i:= 1 to N do
Begin
    A[i] := random(2*N+1)-N; //Заполняем массив случайными числами
    Write(' ',A[i]); //и выводим его на экран
End;
WriteLn;

B := A[N]; //В переменной B будет находится искомое число
For i:= 1 to N-1 do
    if (A[i] > 0)and(A[i] < B) then
      B := A[i];
WriteLn('Наименьшее положитиельное чилсо: ',B);
End.

0 0

4 года назад

Дана программа. Введи данную программу в Паскаль. program perimetr_1; var a,b,p:real; begin a: = 9; b: = 9; p:=2*(a+b); writeln(

joyinlife2

2*(9+9)=2*18=36;

Полученный результат p= 36

0 0

4 года назад

Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько клеток будет через 3, 6, 9,..., 24 часа, если первона

Alex1002

Var
    amoebas, t: integer;

begin
    amoebas := 1;
    t := 0;

    repeat
        t := t + 3;
        amoebas := amoebas * 2;
        Writeln(amoebas, ' амеб через ', t, ' часа');
    until t >= 24;
end.

0 0

4 года назад