本文の答えをよこしてください。

質問

Σ1/(i + k) の計算

［問題］正の整数 n を入力し，次の式の値を計算し，出力するプログラムを書け．
1/1 + 1/2 + 1/3 + ・・・ + 1/n
上記の問題が解けませんので解答お願いします。
上記の問題をdouble形式でお願いします。

回答No.2

DIooggooID · ベストアンサー

一例ですが、

program main
implicit none
integer　　　　i,　　n
double precision　　　　 x

read　　*,　　n

if(　n　.lt.　0　)　then

　　　　print　*,　"　n　is　less　than　0.　"

　　else

　　　　x=0.0

　　　　do　i　=　1,　n

　　　　　　　x　=　x　+　1.0　/　dble(　1　+　i　)

　　　　end　do

　　　　print　*,　"Σ1/(i + k)=",　x

　　end　if

end　program main

回答No.1

Versailles123

言語は？？
それに、i+kって？
iはループ変数でkは定数？

定数は1でよい？
iはどこまでループするの？？

逆に質問ばかりになってしまいました(^_^;)