Найдите приближенное значение числа pi.

@лера11 · Регистрация: 31.10.2016

В 1674 году Г. Лейбниц показал, что число п/4=1-1/3+1/5-1/7+...
Найдите приближенное значение числа pi, просуммировав 100 членов этого ряда.

@Puporev · 01.11.2016, 12:30

Pascal

var i,k:integer;
    p:real;
begin
p:=0;
k:=-1;
for i:=1 to 100 do
 begin
  k:=-k;
  p:=p+k/(2*i-1);
 end;
write('pi=',4*p:0:5)
end.

@лера11 0 / 0 / 0 Регистрация: 31.10.2016 Сообщений: 50
		1
	Найдите приближенное значение числа pi. 01.11.2016, 10:56. Показов 1580. Ответов 1 Метки нет (Все метки) В 1674 году Г. Лейбниц показал, что число п/4=1-1/3+1/5-1/7+... Найдите приближенное значение числа pi, просуммировав 100 членов этого ряда. 0

Опции темы

Решение