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