Сканируется цветное изображение размером 50,8×50,8 см. разрешающая способность сканера - 600×1200 dpi, глубина цвета - 32 бита. какой информационный объем будет иметь полученный графический файл? ответ в байтах, ​

var

a: array[1..31] of real;

i,k: integer;

min: real;

begin

min: =50;

for i: =1 to 31 do

begin

readln(a[i]);

if a[i]< min then min: =a[i];

end;

k: =0;

for i: =1 to 31 do

if a[i]=min then k: =k+1;

writeln(k);

end.

program chislo;

var n,delit,count,ccount: integer; beginread(n); count: =0; ccount: =0; for delit: =1 to n doif n mod delit = 0 thenbegincount: =count+1; if (delit mod 2 = 0) then ccount: =ccount+1; end; writeln('делителей: ',count); writeln('четных делителей: ',ccount); end.

4)¬a λ b λ ¬c: только это логическое выражение будет равносильно начальному

за тридевять земель или к чёрту на кулички