Срочноооо!!! найдите сумму чисел 1/2+1/4+1/6+...1/20
это программу надо написать? или самому считать
Программу
Const num=20; var i,j:byte; r:real; begin i:=2; r:=0; while i<=num do begin<br> r:=r+1/i; i:=i+2; end; writeln('1/2+1/4+1/6+...1/20 = ', r); end.
Если честно, то не понятно в чем суть вопроса...И тут легко ошибиться, но ответ 1.9875 1/2=0.5 1/4=0.25 1/6=0.1666...~0.7 1/8=0.125 1/10=0.1 1/12=0.08333~ 0.08 1/14=0.07142...~0.07 1/16=0.0625 1/18=0.05 1/20=0.05
НУ ладн
Ну*