Вычислить сумму ряда до n количества значений s=1+ 1/2+1/4+1/(8 )… напишите программу в паскале
185
205
Ответы на вопрос:
Не корректная постановка , но понять можно. var n,i: integer; s,a: real; begin write('n='); readln(n); s: =1; a: =1; for i: =2 to n do begin a: =a*2; s: =s+1/a; end; writeln('s=',s: 6: 4); end.
Популярно: Информатика
-
igolovkov201516.09.2021 05:17
-
lizamankova9421.11.2022 04:00
-
СоедвалиеваСофия03.07.2020 00:44
-
vanyad0903.11.2020 20:21
-
Про100zvezda21.08.2020 06:00
-
dedpul2321.04.2022 08:27
-
изу19716.08.2022 15:53
-
xtreil181пингвинчик27.05.2022 11:08
-
Yyyyyyshdvjfc19.05.2020 12:38
-
misha9967204.11.2020 21:55