Запиши программу на языке Паскаль. Вычисли сумму s = n ∑ k=1

k+1/k^2+1, если значение n вводит пользователь. Если n=6, то вывод на экран (Ответ округли до сотых)

Question

Информатика

Татуся

3 августа, 16:47

Запиши программу на языке Паскаль. Вычисли сумму s = n ∑ k=1

k+1/k^2+1, если значение n вводит пользователь. Если n=6, то вывод на экран (Ответ округли до сотых)

+4

Ответы (1)

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

Олегушка · Answer 1

Var

S:real;

k:integer;

Begin

Write ('n = ') ; ReadLn (k) ;

For k: = 1 to k do

S:=S + (k+1) / (k*k+1) ;

if k=6 then Write ('S = ', S:0:2)

End.

Результат работы программы:

n = 6

S = 2.71

Запиши программу на языке Паскаль. Вычисли сумму s = n ∑ k=1k+1/k^2+1, если значение n вводит пользователь. Если n=6, то вывод на экран (Ответ округли до сотых)

Запиши программу на языке Паскаль. Вычисли сумму s = n ∑ k=1

k+1/k^2+1, если значение n вводит пользователь. Если n=6, то вывод на экран (Ответ округли до сотых)