Фотографию размером 1024x512 пикселей сохранили в виде несжатого файла. Для хранения информации о цвете каждого пикселя использовали 32 бита. Определите размер получившегося файла в мегабайтах. Запишите ответ одним числом без единиц измерения.

Размер файла определим по формуле:

I = i*k, где i- глубина цвета (бит), k- количество пикселей

Результат I будет в битах, разделив на (8*1024*1024), получаем результат в Мбайт

I=32*1024*512/(8*1024*1024)= 2 Мб

ответ: 2

Объяснение:

Пишите язык, который вам нужен. Пишу на наиболее вероятном: Pascal.
program massiv;

uses crt;

var A:array[1..10] of integer; s: real; i,k, p: integer;

begin

clrscr;

randomize;

writeln ('задан массив:');

for i:=1 to 10 do

begin

a[i]:=random(100); {задание массива}

s:=s+a[i];{ считаем сразу сумму элементов}

write (a[i]:4); {вывод на экран}

end;

s:=s/10;

for i:=1 to 10 do

if a[i]>s then p:=p+1;

if p mod  2= 0 then {проверка на четность}

                          for i:=1 to 10 do a[i]:=a[i]+i

                             else 

                                        begin

                                        k:=a[5];

                                        a[5]:=a[6];

                                        a[6]:=k; {обмен значений а5 и а6. если считать их центральными элементами, через третью переменную}

                                        end;

writeln; {дабы у вас ничего не слиплось}

for i:=1 to 10 do write (a[i]:4); {вывод полученного массива на экран} 

end.

 

 

 

Пишите язык, который вам нужен. Пишу на наиболее вероятном: Pascal.
program massiv;

uses crt;

var A:array[1..10] of integer; s: real; i,k, p: integer;

begin

clrscr;

randomize;

writeln ('задан массив:');

for i:=1 to 10 do

begin

a[i]:=random(100); {задание массива}

s:=s+a[i];{ считаем сразу сумму элементов}

write (a[i]:4); {вывод на экран}

end;

s:=s/10;

for i:=1 to 10 do

if a[i]>s then p:=p+1;

if p mod  2= 0 then {проверка на четность}

                          for i:=1 to 10 do a[i]:=a[i]+i

                             else 

                                        begin

                                        k:=a[5];

                                        a[5]:=a[6];

                                        a[6]:=k; {обмен значений а5 и а6. если считать их центральными элементами, через третью переменную}

                                        end;

writeln; {дабы у вас ничего не слиплось}

for i:=1 to 10 do write (a[i]:4); {вывод полученного массива на экран} 

end.