1. Определите количество цветов в палитре, либо глубину цвета, согласно данным в таблице.
N
і
16
8
2. Определите объем памяти, необходимой для хранения
изображения с разрешением 320480 и глубиной цвета 4 бита.
ответ дайте в байтах.
3. Объем памяти, необходимой для хранения изображения с
разрешением 320160 равен 100 Кб, определите количество цветов
в палитре изображения.

👇

Увидеть ответ

Ответ:

nikitagarin2

18.03.2022

1) N= $2^{i}$

n=16 цветов, i=4 бит,( i=16 бит, n=65536 цветов)

n=8 цветов, i=3 бит, ( i=8 бит, n=256 цветов)

2)V=расширение изображения умножить на глубину цвета= 320*480*4=614400 бит=76800 байт=75 Кбайт

3)из формулы использованной во второй задачи находим глубину цвета, для этого объем (в битах)делим на разрешение, i= $\frac{100*1024*8}{320*160}$ =16 бит

Теперь находим количество цветов по формуле из первого задания

n= $2^{16}$ =65536 цветов

4,8(55 оценок)

Открыть все ответы

Ответ:

GerDeBye

18.03.2022

Program N198453627;
uses crt;
var
n,i:integer;
max,v:real;
yes: string;
begin
writeln('*** alphaues is thinking... ***');
writeln('***          OK             ***');
max:=0;
yes:='NO';
writeln('Введите количество машин (не больше 30 - у меня мало памяти!)');
write('N = ');
readln(n);
if n>30 then
      writeln('Это слишком много!')
    else
      begin
        writeln('Вводите зарегистрированную скорость каждого автомобиля');
        for i:=1 to n do
          begin
            write(i,'-й автомобиль: ');
            readln (v);
            if v >300 then
                begin
                  writeln ('По-моему, твои приборы плохо отрегулированы - так быстро машины не ездят!');
                  writeln ('Это число не будет учтено');
                end
              else
           if v < 1 then
                begin
                  writeln ('Ты точно умеешь измерять скорость автомобиля? Скорость не может быть меньше 1!');
                  writeln ('Это число не будет учтено');
                end
              else
                begin
                  if v<30 then yes:='YES';
                  if v>max then max:=v;
                end;
          end;
        writeln();
        writeln('Максимальная зарегистрированная скорость: ',max);
        writeln('Cкорость меньше 30 км/ч? ',yes);
      end;
end.

4,8(94 оценок)

Ответ:

ушкаа

18.03.2022

Паскаль АВС:

Program Maxtv;
uses crt;
const n=10;
var
a:array[1..n] of real;
r: real;
i:integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('***          OK             ***');
writeln();
writeln('Введите R, не равное 0'); readln(r);
if r<>0 then
    begin
      writeln('Элементы массива:');
      randomize;
        for i:=1 to n do
          begin
            a[i]:=random(100)-50;
            write (a[i]:7:2);
          end;
        writeln();
        writeln('Заменяем 2,4,5,9:');
        a[2]:=a[2]/r;
        a[4]:=a[4]/r;
        a[5]:=a[5]/r;
        a[9]:=a[9]/r;
        for i:=1 to n do
          write (a[i]:7:2)
    end
else
    writeln('Ну вас же просили не вводить 0!');
end.