Написать программу, которая вычисляет сумму первых n членов ряда 1+1/3+1/5+1/7… 1/n…

Question

46

Написать программу, которая вычисляет сумму первых n членов ряда 1+1/3+1/5+1/7… 1/n через опреатор for todo

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

ответить

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

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

glazzene · Accepted Answer

52

glazzene

31 марта 2023

Var n,i: integer; s: real; Begin write ('n='); readln (n); s: =0; for i: =1 to (n*2) -1 do if (i mod 2) <>0 then s: =s+1/i; writeln ('s=',s: 0:2); End.

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

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

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

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