Усовершенствовать программу. следующее. "дано вещественное число x и целое число n> 0. найти значение выражения x-x^3/(3! )+x^5/(5! )-+(-1)^n*x^2*n+1/((2*n+*(n! =1*)". я вроде бы решил эту . вот моё решение: uses crt; var i, n: integer; sum, a, x, z: real; begin write ('введите n: '); readln (n); write ('введите x'); readln (x); z: =sqr (x); a: =x; sum: =x; for i: =2 to n do begin a: =-a*z; sum: =sum + a/(2*i+1) end; writeln; writeln ('значение суммы', sum); end. но мой преподаватель придрался к строчке: sum: =sum + a/(2*i+1) вопрос к вам следующий. как задать значение "i" по другому? заранее ! ps я так понял, что его не устроила запись 2i и он хочет, чтобы i было просто i. извините меня за такие простецкие выражения, я - начинающий. пришлите, , ваш вариант решения данной , если несложно, иначе не разберусь.