profile
Опубликовано 5 лет назад по предмету Информатика от lilia1306

Вычислить сумму +^3/3+^5/5+⋯+^11/11, x вводится с клавиатуры

  1. Ответ
    Ответ дан vladmor
    //PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
    var x,xn,i,j:integer;
      s:real;
    begin
      readln(x);
      i:=1;
      while i<=11 do begin
        xn:=1;
        for j:=1 to i do xn:=xn*x;
        s:=s+xn/i;
        i:=i+2;
      end;
      writeln(s);
    end.