pascal найти сумму 35 членов ряда s=2/3+4/9+6/27+8/81....

Pascal отыскать сумму 35 членов ряда s=2/3+4/9+6/27+8/81....

Задать свой вопрос
Николай Рачко
я сделал вот такvar i:integer; sum:real;function f(x:integer):real;begin f:=(2*x)/(exp(ln(3)*x));end;begin sum:=0; for i:=1 to 35 do begin sum:=sum+f(i); end; writeln('Sum = ',sum:6:2); Readln;end.
Артемий
мне нужен иной вариант решения
Борис
кто знает как сделать?
2 ответа
Эта сумма равна 75047317648499524 / 50031545098999707, что предположительно сочиняет  1.49999999999999927046.

// PascalABC.NET 3.2, сборка 1485 от 15.06.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var k:=BigInteger(3);
  var s:=2/k;
  for var i:=2 to 35 do begin k*=3; s+=2*i/k end;
  Writeln('s=',s)
end.

Итог
s=1.5
Венивминова Милена
спасибо огромное
На первом скрине сама программка на втором итог её работы, сумму я округлил чтоб перед запятой было 3 знака и после  
Оксана
огромное спасибо
Antosjuk Timur
да без заморочек
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт