Написать прогу на паскале! Дан числовой ряд и некоторое малое число e (например,…

Question

74

Написать прогу на паскале! Дан числовой ряд и некоторое малое число e (например, e=0,00001). Найти сумму тех членов ряда, модуль которых большеили равен заданному e. Общий член ряда имеет вид: An=n! / (2n)!

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

andreymani · Accepted Answer

42

andreymani

02 апреля 2023

var fac1,fac2,sum,an,e: real; i,j: integer; beginreadln (e); an: =0,5; fac1: =1; fac2: =1; i: =1; while an>=e do begin inc (i); sum: =an+sum; for j: =1 to i do fac1: =j*fac1; for j: =1 to 2*i do fac2: =j*fac2; an: =fac1/fac2; end; writeln (sum); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: