Const n=20;
var a: array[1..n] of integer;
i, max, imax, min, imin : integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
begin
a[i]:=random(101)-50;
write(a[i],' ');
end;
writeln;
max:=a[1]; imax:=1; min:=a[1]; imin:=1;
for i:=2 to n do
begin
if a[i] > max then begin max:=a[i]; imax:=i; end;
if a[i] < min then begin min:=a[i]; imin:=i; end;
end;
writeln('max=',max,' min=',min);
a[imax]:=min; a[imin]:=max;
writeln('Измененный массив:');
for i:=1 to n do write(a[i],' '); writeln;
end.
Пример:
Исходный массив:
-20 6 40 -34 -31 48 1 -24 -35 24 23 8 -13 28 22 -38 26 35 -3 0
max=48 min=-38
Измененный массив:
-20 6 40 -34 -31 -38 1 -24 -35 24 23 8 -13 28 22 48 26 35 -3 0
1)176*512=90172 пикселей всего
2)33 Кбайт=33792 байт=270336 бит.
3)270336/90172=3
4) 2^3=8 цветов.
Ответ: 8
RFV,EP RE,HBR ZRJHM
DFDASD ASD ASD ASDAS DASD ASD
Меню: Правка
Недоступны: вернуть, повторить
Вставить: Ctrl+V
Следующие меню: Вид
Доп. информация: закрыть окно (сохранить после закрытия)