Помогите пожалуйста решить 6,7 задачи.Вопрос жизни и смерти.
6)N-натуральное,a-действительное.Вычислите:1/a+2/a+...+n/a.
7)n-натуральное.Вычислите:1/sin1+1/sin1+sin2+...+1/sin1+...+sinn

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018Внимание! Если программа не работает, обновите версию!№6begin  var n:=ReadInteger('n=');  var a:=ReadReal('a=');  SeqGen(n,i->i/a,1).Sum.Printlnend.Примерn= 10a= 3.515.7142857142857№7begin  var n:=ReadInteger('n=');  var (s,den):=(0.0,0.0);  for var i:=1 to n do begin    den+=Sin(i); s+=1/den    end;  s.Printlnend.Примерn= 58.84574027314699