Question

x + x^33+x^55+ ......x^1111 вычислить 
язык паскаль 

Answer 1

var 
  x,i: integer;
  rez: real;
begin
  write ('Введите x:  ');
  readln (x);
  i:=1;
  rez:=0;
  while i<=11  do begin
    rez:=rez+power(x,i)/i;
    i:=i+2;
  end;
  writeln ('rez = ',rez);
end.
-----------------------------------------
Введите x:  2
rez = 272.423088023088