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

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

Question

Информатика

Игорь

3 декабря, 04:15

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

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

+2

Ответы (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, то вывод на экран (Ответ округли до сотых)