6. какое из представленных определений не является методом классификации объектов: а) иерархический б) фасетный в) дескрипторный г) структурный.

Не является методом классификации : г) структурный

1. Кол-во информации для хранения 1 точки = log(2)128=7 бит,кол-во точек = 11 Кбайт/7 бит = 11*1024*8 бит/7 бит=12873,1428571.Если считать, что информации не 11 Кбайт, а 14 (что скорее всего), то 14*1024*8/7=16384

2. 42 Кбайт/(64*128 пикселов)=42*1024 байт/8192=5,25 байт=42 бит. Кол-во цветов = 2^42=что-то очень много, скорее всего - опять опечатка. Если вместо 42 взять 12, то 12 Кбайт/(64*128 пикселов)=12*1024 байт/8192=1,5 байт=12 бит, кол-во цветов = 2^12=4096

3. 64*64*log(2)32/(1024*8)=2.5 Кбайт

4. log(2)512/log(2)32=9/5=1,8

5. количество цветов должно быть 16777216

log(2)16777216=24 (бит на один пиксель), в байтах 24/8=3

Объяснение:

var i,n:integer; a:array[1..100]of integer;

begin

write('Введите размер массива: '); readln(n);

writeln('Введите значения элементов массива, разделяя их пробелами');

for i:=1 to n do read(a[i]); readln;

for i:=1 to n do write(a[ i]:8); writeln;

for i:=n downto 1 do write(a[i]:8); writeln;

writeln('Для выхода нажмите Enter'); readln

end.

2)

var i,n:integer; a:array[1..100]of integer;

begin

write('Введите размер массива: '); readln(n);

writeln('Введите значения элементов массива, разделяя их пробелами');

for i:=1 to n do read(a[ i]); readln;

for i:=1 to n do if a[i]<0 then write(i:2,a[i]:8); writeln;

writeln('Для выхода нажмите Enter'); readln

end.

3)

var i,n:integer; a:array[1..100]of integer;

begin

write('Введите размер массива: '); readln(n);

writeln('Введите значения элементов массива, разделяя их пробелами');

for i:=1 to n do read(a[i]); readln;

for i:=1 to n do if not odd(i) then write(a[i]:8); writeln;

writeln('Для выхода нажмите Enter'); readln

end.

4)

var i,n,s:integer; a:array[1..100]of integer;

begin

write('Введите размер массива: '); readln(n);

writeln('Введите значения элементов массива, разделяя их пробелами');

for i:=1 to n do read(a[i]); readln;

for i:=1 to n do write(a[i]:8); writeln;

s:=0; for i:=1 to n do s:=s+a[i]; writeln('Sum=',s); ;

writeln('Для выхода нажмите Enter'); readln

end.