Решение задачи For 27

#include <bits/stdc++.h>
using namespace std;

int main() {
	srand((int)time(0));
	int N;
	N = rand() % 30 + 1;
	//N = 30;
	double X = (rand() % 200 - 100) / 100.0;
	//X = 0.1;
	
	double p = X, s = X;
	double k = 1.0;
	for(int i = 1; i <= N; i++) {
		p *= k/((k+1)*(k+2))*X*X;
		s += p;
		cout << i << " : "<< p << " : "<< s << endl;
		k += 2;
		p *= k;
	}
	cout << "Number N: " << N << endl;
	cout << "Number X: " << X << endl;
	cout << "Result: " << s << endl;
	cout << "asin(" << X <<") = " << asin(X) << endl;
	
	return 0;
}

import math
X = 0.9
N = 100
print('X = ', X)
print('N = ', N)

p = X
S = X
k = 1
for i in range(1,N+1):
    p *= k/((k+1)*(k+2)) * X*X
    S += p
    print(i," : ",k," : ",p," : ",S)
    k += 2
    p *= k

print("Result:")
print(S)
print("asin(x):")
print(math.asin(X))
									

program For27;
var
  X,Rez,pow,TempRez1,TempRez2:Real;
  N, i :Integer;
begin
  Write('Введите X: ');
  Readln(X);
  Write('Введите N: ');
  Readln(N);
  Rez:=X;
  pow:=X;
  TempRez1:=1;
  TempRez2:=1;
  For i:=1  to N-1 do
   begin
    TempRez1:=TempRez1*(2*i-1);
    TempRez2:=TempRez2*(2*i);
    pow:=pow*X*X;
    Rez:=Rez+TempRez1*Pow/(temprez2*(2*i+1));
   end;
  Writeln(Rez);
end.