переведите с паскаля на питон.
k := 0;
for i:=1 to N do begin
if (a[i] mod 5 = 0) and (a[i] < 100)
then k := k + 1;
end;
for i:=1 to N do begin
if (a[i] mod 5 = 0) and (a[i] < 100)
then a[i] := k;
writeln(a[i])
end;

n = 5  # задаем размер массива

a = [0]*n  # задаем массив

k = 0

for i in range(0, n):

   if (a[i] % 5 == 0) and (a[i] < 100):

       k += 1

for i in range(0, n):

   if (a[i] % 5 == 0) and (a[i] < 100):

       a[i] = k

   print(a[i])