Растровый графический файл содержит черно-белое изображение с 32 градациями серого цвета размером 16х32 пикселя. Каков информационный объем этого файла?2-Черно-белое (без градаций серого) растровое графическое изображение имеет размер 15 25 точек. Какой объем памяти займет это изображение?3-Какой объем видеопамяти необходим для хранения страниц изображения, если битовая глубина равна 24, а разрешающая дисплея- 800 х 600 пикселей?​

Информационные процессы в живой природе распространены гораздо больше, чем это может показаться на первый взгляд. С ними связано опадение листвы осенью, прорастание цветов весной и другие привычные явления хранить, передавать и получать информацию — одна из особенностей живой материи. Без нее невозможен нормальный обмен веществ, при к условиям окружающей среды, обучение и так далее. Информационные процессы в неживой природе также существуют, но отличаются несколькими особенностями и в первую очередь выступают в качестве меры упорядоченности системы. - Читайте подробнее на FB.ru: http://fb.ru/article/240131/informatsionnyie-protsessyi-v-jivoy-prirode-ponyatie-informatsionnogo-pr...

1
var i, minus, plus, zero: integer;
t: array [1..15] of integer;
begin
minus := 0;
plus := 0;
zero := 0;
for i := 1 to 15 do
begin
readln(t[i]);
if t[i] > 0 then plus := plus + 1;
else if t[i] < 0 then minus := minus + 1;
else zero := zero + 1;
end;
end.

2
var stroke: string;
begin
readln(stroke);
if length(stroke) mod 2 = 0 then writeln('Четно');
else writeln('Нечетно');
end.

3 (Сейчас далеко от компа, когда буду рядом отредачу)

4
var max, min, i: integer;
A: array[1..20] of integer;
begin
min := a[1];
max := a[1];
for i := 2 to 15 do
begin
if a[i] > max then max := a[i];
if a[i] < min then min := a[i];
end;
end.