помогите перевести с паскаля на питон

Pasсal:

for i:=2 to n do
begin
 x:=a[i];
 o:=1; v:=i;
 while (o<v) do
 begin
  m:=(o+v)/2;
  if a[m]<=x then o:=m+1
  else v:=m;
 end;
 for j:=i downto v+1 do a[j]:=a[j-1];
 a[v]:=x;
end;

Не очень разбираюсь, поэтому просто смогла сделать такой перевод (но что-то не так, здесь мне нужно отсортировать список по возрастанию именно с помощью данного кода, но он сортирует неверно):

for i in range(1,n):
x=l[i]
o=1
v=i
while o<v:
    m=(o+v)/2
    if m<x:
        o=m+1
    else:
        v=m
for j in range(i-1,v,-1):
    l[j]=l[j-1]
l[v]=x