Программирование (Паскаль) - Помощь студентам

simplex1337 · 23.10.2019, 13:51

Дано натуральное число n.
Вычислить P=(1 - 1/2 ) (1 - 1/4) (1 - 1/6)...(1 - 1/2n)

Serge_Bliznykov · 23.10.2019, 13:54

Код:

P := 1;
for i:=1 to n do P:=P*(1-1/(2*i));

p51x · 23.10.2019, 13:54

p := 1
for i := 1 to n do p := p * (1-1/(2*i))

digitalis · 23.10.2019, 16:21

Вот это синхрон ! ! !

Вадим Мошев · 23.10.2019, 19:32

Цитата:

Сообщение от digitalis

Вот это синхрон

Бери, что хочешь и бесплатно

23.10.2019, 13:51	#1
simplex1337 Новичок Джуниор Регистрация: 23.10.2019 Сообщений: 1	Программирование (Паскаль) Дано натуральное число n. Вычислить P=(1 - 1/2 ) (1 - 1/4) (1 - 1/6)...(1 - 1/2n)

23.10.2019, 13:54	#2
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	Код: `P := 1; for i:=1 to n do P:=P(1-1/(2i));`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
программирование паскаль	Светлана В.	Помощь студентам	10	01.03.2018 11:38
Программирование. Паскаль!	Регина91	Помощь студентам	2	21.11.2017 19:57
Программирование (Паскаль)	Кристинка-	Помощь студентам	0	14.11.2011 19:49
Программирование на паскаль	Arsen05	Паскаль, Turbo Pascal, PascalABC.NET	2	28.02.2011 14:58
Паскаль (fp) программирование	katushkazolotce	Помощь студентам	6	12.10.2010 15:46

23.10.2019, 13:54	#3
p51x Старожил Регистрация: 15.02.2010 Сообщений: 15,709	p := 1 for i := 1 to n do p := p * (1-1/(2*i))

23.10.2019, 16:21	#4
digitalis Старожил Регистрация: 04.02.2011 Сообщений: 4,551	Вот это синхрон ! ! !