Составьте , программу в питоне систему уравнений

var 

i,n: integer;

begin

readln(n);

for i: =1 to n-1 do write(i*i: 5);

end.

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b) and (b> c) then begin

      a: =a*2;

      b: =b*2;

      c: =c*2;

  end

  else begin

      a: =-a;

      b: =-b;

      c: =-c;

  end;

  writeln(a,b,c);

end.

txt, doc  – расширения текстовых документов.

линейный. алгоритмы, в которых команды выполняются последовательно одна за другой, в порядке их записи, называются