Регистрация
Войти
Стать экспертом Правила
Информатика

x + x^3\3+x^5\5+ ......x^11\11 вычислить
язык паскаль

ОТВЕТЫ
Var 
  x,i: integer;
  rez: real;
begin
  write (Введите x:  );
  readln (x);
  i:=1;
  rez:=0;
  while ilt;=11  do begin
    rez:=rez+power(x,i)/i;
    i:=i+2;
  end;
  writeln (rez = ,rez);
end.
-----------------------------------------
Введите x:  2
rez = 272.423088023088

85
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам