Ответы на вопрос:
// сумма 2 членов ряда = 1- 1/2+1/3=0.83333333 примерно
program sumposl; uses crt; var i,n: integer; c: real; begin c: =1; clrscr; write('введите n: ' ); readln(n); for i: =2 to (n+1) do if odd(i)=false then c: =c-(1/i) else c: =c+(1/i); writeln('сумма n членов ряда: ',c: 5: 5); readkey; end.
Популярно: Информатика
-
vikusya2000121.02.2021 09:48
-
LegPug17.01.2022 17:27
-
бездoмныйБoг11.06.2020 14:54
-
Nuri01112.03.2023 21:07
-
alekseyovsyann27.08.2022 07:48
-
romakereshev20.09.2022 04:15
-
kpodavilnikova05.01.2021 16:30
-
nikitaevaoa06.07.2020 06:20
-
brain6728.05.2021 17:38
-
erke2206.04.2021 22:05