import random as r
x=int(
maximum=100
len_array=r.randint(3,maximum)
len_array=9
while len_array%2==0:
len_array=r.randint(1,maximum)
array=[r.randint(0,maximum) for i in range(len_array)]
mid=len_array//2
array[mid]=x
array[mid+1]=x+1
array[mid-1]=x-1
for i in range(mid-1):
if array[i+1]
array[i+1],array[i]=array[i],array[i+1]
for i in range(mid+2,len(array)-1):
if array[i+1]
array[i+1],array[i]=array[i],array[i+1]
for i,z in zip(array,range(len(:
if (x-1)==i or x==i or (x+1)==i:
continue
elif i> (x-1) and z
while array[z]> (x-1):
array[z]=r.randint(0,mid-1)
elif i< (x+1) and z> mid-1:
while array[z]< (x+1):
array[z]=r.randint(mid+1,maximum)
print(array)
uses crt;
const n=10;
var a: array[1..n]ofinteger;
i,j,k: byte; c: integer;
begin
randomize;
clrscr;
writeln('исходный массив: ');
for i: =1to n do begin
a[i]: =random(19)-9;
write(a[i]: 3); end; writeln;
k: =0; for i: =1to n-1do f
or j: =i+1 to n do if a[i]> a[j] then begin
c: =a[i];
a[i]: =a[j];
a[j]: =c;
inc(k);
end;
writeln('результат сортировки: ');
for i: =1 to n do write(a[i]: 3);
writeln;
writeln('кол-во перестановок = ',k);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Сколько единиц в двоичной записи числа 195? а) 5 б) 2 в) 3 г) 4
ответ четыре так как получается 1100011