Помогите, пожалуйста, не могу найти ошибку

вы когда писали, забыли * поставить между 2 и n; правильно так: r:=((2*n+1)*(x*x))/((2*n-1)*n);