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

program lab;
 
uses
  crt;
const
  filename = 'Data.dat';
var
  f: file of real;    { Файловая переменная }
  b: array of real;   { Переменная для хранения динамического массива}
  a: real;            { Промежуточная переменная для операции с файлом}
  dig: real;          { Переменная для хранения значения вводимого числа}
  i,k: integer;       { Вспомогательные переменные для организации циклов}
begin
  randomize;
  assign(f,filename);
  rewrite(f);
  writeln('Содержание файла "',filename,'": ');
  for i:= 1 to 15 do
    begin
      a:= -5+10*random;     { Генерация случайных действительных чисел}
      write(f,a);           { Запись случайных чисел в файл}
      write(a:8:2);         { Вывод значений компонентов файла в консоль}
    end;
  writeln;
  write('Введите заданное число: ');
  repeat
    Readln(dig);
    if (dig < 0) then   { Условие для проверки вводимого числа на отрицательное значение}
      writeln('Ошибка ввода! Повторите попытку.')
    else
      break;
  until false;
  SetLength(b,filesize(f));   { Установка размера динамического массива}
  k:= -1;
  reset(f);
  for i:= 0 to filesize(f)-1 do
    begin
      Read(f,a);             { Чтение данных из файла}
      if not (abs(a) < dig) then     { Условие для выбора компонентов файла согласно условию задачи}
        begin
          inc(k);             { Увеличение счетчика}
          b[k]:= a;           { Запись найденных компонентов в динамический массив}
        end;
    end;
  SetLength(b,k+1);   { Установка размера динамического массива}
  rewrite(f);
  writeln('Новое содержание файла "',filename,'": ');
  for i:= 0 to length(b)-1 do
    begin
      write(f,b[i]);            { Запись элементов динамического массива в файл}
      write(b[i]:8:2);          { Вывод элементов массива в консоль}
    end;
  Close(f);
  Readln;
end.