Найти сумму N первых членов ряда. Y=1+X/2+X/3+X[/SUP]/4+..., где Х - любое число.

@Бедный студент · Регистрация: 23.12.2012

Author24 — интернет-сервис помощи студентам

@derrserg · 23.12.2012, 22:30

Pascal

function sumN(X: Double; N:Integer):  Double;
var
  i:  Integer;
 Y:  Double;
begin
 Y:=1;
 for i:=2 to N do
 begin
  Y:=Y+X/i;
 end;
 Result:=Y;
end;

@Бедный студент 0 / 0 / 0 Регистрация: 23.12.2012 Сообщений: 10
		1
	Найти сумму N первых членов ряда. Y=1+X/2+X/3+X[/SUP]/4+..., где Х - любое число. 23.12.2012, 22:19. Показов 3186. Ответов 1 Метки нет (Все метки) Найти сумму N первых членов ряда. Y=1+X/2+X/3+X[/SUP]/4+..., где Х - любое число. 0

	23.12.2012, 22:30

Найти сумму N первых членов ряда. Y=1+X/2+X/3+X[/SUP]/4+..., где Х - любое число.

Решение