Помощь - Поиск - Пользователи - Календарь
Полная версия: Вычислить сумму-Пожалуйста!
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Ildar
Составить программу вычисления суммы вида:
а) 1+1/2^3+1/3^3+…+1/50^3;

б) 1/2^2+1/4^2+1/6^2+…+1/128^2

^- означает степень(2^2 это 2 во второй степени)
мисс_граффити
FAQ читал? там есть примеры программ с рядами.
а вообще - начни с записи общего члена ряда
Ildar
Я не могу найти, надо на завтра мне срочно помогите
мисс_граффити
Общие вопросы по математике.
Ildar
Я уже 4 часа не могу решить эту задачу. Может кто нибудь быстренько раскидает?
мисс_граффити
маловероятно.
здесь не очень принято полностью писать код за человека.
ты бы показал результаты деятельности за 4 часа....
Better Kind
Цитата(Ildar @ 17.11.2007 19:35) *

Я уже 4 часа не могу решить эту задачу. Может кто нибудь быстренько раскидает?

1)
Код

function f(x:integer):real;
begin
  f:=1/exp(ln(x)*3); // функция изменения
end;
..
  for i:=1 to 50 do
    sum:=sum+f(i);
..

2)
Код

function f(x:integer):real;
begin
  f:=1/sqr(2*x); // функция изменения
end;
..
  for i:=1 to 64 do
    sum:=sum+f(i);
..
мисс_граффити
Better Kind, нескромный вопрос: ЗАЧЕМ, по твоему мнению, нужен параметр х?
Better Kind
Цитата(мисс_граффити @ 17.11.2007 20:43) *

Better Kind, нескромный вопрос: ЗАЧЕМ, по твоему мнению, нужен параметр х?

благодарю smile.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.