const n=8;
var i,j,v,max,k:integer;
a:array [1..n] of integer = (0,1,9,2,4,3,6,5);
begin
write (' Исходный массив: ');
for i:=1 to n do write(a[i],' ');
writeln;
for i:=1 to n-1 do
begin
max:=i;
for j:=i+1 to n do
if a[j] > a[max] then max:=j;
v:=a[i];
a[i]:=a[max];
a[max]:=v
end;
write ('Преобразованный массив: ');
for i:=1 to n do write(a[i],' ');
end.
Экспертаня система - компьютерная система, способная частично заменить специалиста-эксперта в разрешении проблемной ситуации.
сюда подходят
1) система управления траспортом
2) система моделирования зданий
4. Для хранения цветовой палитры, содержащей 256 цветов, необходимо выделить 8 бит = 1 байт данных ( 2 ^ 8 = 256). Каждый цвет палитры будет кодировать бинарный код, состоящий из 8 разрядов.
Изображение размером 10 на 10 точек состоит из 10 * 10 = 100 пикселей.
Каждый пиксель изображения должен нести информацию о цвете, следовательно, для хранения всей картинки потребуется 8 * 100 = 800 бит = 100 байт.
Ответ: информационный объём изображения 800 бит (100 байт).
shift, caps lock.........................................