Запиши программу ** языке Паскаль. Вычисли сумму s=∑_(k=1)^n▒(k+1)/(k^2+1), если значение...

0 голосов
686 просмотров

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


image

Информатика | 686 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var
   S:real;
   k:integer;
Begin
Write('n = ');
Read(k);
S:=0;
For k:= 1 to k do
    S:=S+(k+1)/(k*k+1);
if k = 8 then Write('S = ',S)
End.

(34.0k баллов)