For25. Дано вещественное число X (|X| < 1) и целое число N (> 0). Найти значение выражения X — X2/2 + X3/3 -…+ (-1)N-1*XN/N. Полученное число является приближенным значением функции ln в точке 1 + X.
>Решение Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | program For25; var X,Rez,pow:Real; N, i :Integer; begin Write('Введите X: '); Readln(X); Write('Введите N: '); Readln(N); Rez:=0; pow:=1; For i:=1 to N do begin pow:=pow*X; Rez:=Rez+pow/i; pow:=pow*(-1); end; Writeln(Rez); end. |
>
Решение C
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | #include int main(void) { float x; printf("X:"); scanf ("%f", &x); int n; printf("N:"); scanf ("%i", &n); float x1=x,rez=x; int i; for (i =2; i<=n; ++i){ x1 *= -1*x; rez += x1/i; printf("%f; %f \n ",rez,x1); } printf("%f \n ",rez); return 0; } |
Решение C++
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | #include <iostream> using namespace std; int main() { setlocale(LC_ALL, "Russian"); float x; cout<<"X:"; cin>>x; int n; cout<<"N:"; cin>>n; float x1 = x, rez = x; int i; for (i = 2; i <= n; ++i) { x1 *= -1 * x; rez += x1 / i; } cout<< rez; } |
где python