Дано целое число N (> 0). Используя один цикл, найти сумму 1 + 1/(1!) + 1/(2!) + 1/(3!) + ... + 1/(N!)

@Stalker77 · Регистрация: 07.10.2010

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

Дано целое число N (> 0). Используя один цикл, найти сумму 1 + 1/(1!) + 1/(2!) + 1/(3!) + ... + 1/(N!). Использовать цикл с параметром

@ChameleoN · 30.11.2010, 14:17

уже была эта задачи юзай поиск

@Stalker77 · 30.11.2010, 14:21 **[ТС]**

Это вроде раздел pascal а не delphi

@ChameleoN · 30.11.2010, 14:26

Functional God, это точно не паскаль

@Stalker77 · 30.11.2010, 14:48 **[ТС]**

ChameleoN, тут была задача найти сумму 1! + 2! + 3! + ... +N!, а не 1 + 1/(1!) + 1/(2!) + 1/(3!) + ... + 1/(N!)

@ChameleoN · 30.11.2010, 15:13

а ту что, сложно изменить?

@Stalker77 · 30.11.2010, 15:20 **[ТС]**

Ну вроде вот набросал только вот не знаю правильно или нет

Pascal

uses crt;
var
c,n:integer;
s,f:extended;
begin
clrscr;
wirteln ('Введите N');
readln (n);
s:=0;
f:=1;
for c:= 1 to n do
begin
f:=f*c;
s:=s+ 1/f;
end;
s:=s+1;
writeln ('Сумма =', s:0:2);
readkey
end.

@SuPeR XaKer · 30.11.2010, 17:49

Stalker77

Pascal

s:=1;
f:=1;
for c:= 1 to n-1 do
begin
f:=f*c;
s:=s+1/f;
end;

@Stalker77 0 / 0 / 0 Регистрация: 07.10.2010 Сообщений: 20
		1
	Дано целое число N (> 0). Используя один цикл, найти сумму 1 + 1/(1!) + 1/(2!) + 1/(3!) + ... + 1/(N!) 30.11.2010, 14:12. Показов 7224. Ответов 7 Метки нет (Все метки) Дано целое число N (> 0). Используя один цикл, найти сумму 1 + 1/(1!) + 1/(2!) + 1/(3!) + ... + 1/(N!). Использовать цикл с параметром 0

@ChameleoN ТруЪ Одмин Всiя Руси 71 / 71 / 14 Регистрация: 20.11.2010 Сообщений: 284
	30.11.2010, 14:17	2
	уже была эта задачи юзай поиск 0

@Stalker77 0 / 0 / 0 Регистрация: 07.10.2010 Сообщений: 20
	30.11.2010, 14:21 [ТС]	3
	Это вроде раздел pascal а не delphi 0

@ChameleoN ТруЪ Одмин Всiя Руси 71 / 71 / 14 Регистрация: 20.11.2010 Сообщений: 284
	30.11.2010, 14:26	4
	Functional God, это точно не паскаль 0

@Stalker77 0 / 0 / 0 Регистрация: 07.10.2010 Сообщений: 20
	30.11.2010, 14:48 [ТС]	5
	ChameleoN, тут была задача найти сумму 1! + 2! + 3! + ... +N!, а не 1 + 1/(1!) + 1/(2!) + 1/(3!) + ... + 1/(N!) 0

@ChameleoN ТруЪ Одмин Всiя Руси 71 / 71 / 14 Регистрация: 20.11.2010 Сообщений: 284
	30.11.2010, 15:13	6
	а ту что, сложно изменить? 0

	30.11.2010, 17:49

Опции темы