Решите циклом. даны действительное число а, натуральное число п. вычислить: s =1 + 1/a2 +1/a4 + +1/a2n-2

Var
    a, s, t: real;
    n, i: integer;

begin
    readln(a, n);
    t := 1;
    for i := 1 to n do
    begin
        s := s + 1 / t;
        t := t * a * a;
    end;
    writeln(s);
end.

аналог не руби для проверки блин

a=2.0
n=4
s=0.0
for i in 1..n
    s+=1/a**(2*i-2)
    p [a**(2*i-2), (2*i-2)]
end
p s

Моде́ль — система, исследование которой служит средством для получения информации о другой системе; представление некоторого реального процесса, устройства или концепции.

Модели́рование — исследование объектов познания на их моделях; построение и изучение моделей реально существующих объектов, процессов или явлений с целью получения объяснений этих явлений, а также для предсказания явлений, интересующих исследователя.

Формализа́ция — представление какой-либо содержательной области (рассуждений, доказательств, процедур классификации, поиска информации, научных теорий) в виде формальной системы или исчисления.

#include <iostream>

#include <time.h>

using namespace std;

void print_array3(int*** mat, int n, int m, int z) {

for (size_t i = 0; i < n; i++) {

 for (size_t j = 0; j < m; j++) {

  for (size_t k = 0; k < z; k++) {

   cout << mat[i][j][k] << " ";

  }

  cout << endl;

 }

 cout << endl;

}

}

pair<int***, pair<int, int>> auto_input_array3_and_counter_positive(int*** mat, int n, int m, int z) {

int sum = 0;

int positive = 0;

for (size_t i = 0; i < n; i++) {

 for (size_t j = 0; j < m; j++) {

  for (size_t k = 0; k < z; k++) {

   mat[i][j][k] = rand() % 200 - 100;

   if (mat[i][j][k] > 0) {

    positive++;

    sum += mat[i][j][k];

   }

  }

 }

}

return make_pair(mat, make_pair(positive, sum));

}

int main()

{

srand(time(NULL));

setlocale(LC_ALL, "Russian");

int n = 100, m = 20, z = 75;

int*** array = new int** [n];

pair<int***, pair<int, int>>  pair_array_and_positive_sum;

for (size_t i = 0; i < n; i++) {

 array[i] = new int* [m];

 for (size_t j = 0; j < m; j++) {

  array[i][j] = new int[z];

 }

}

pair_array_and_positive_sum = auto_input_array3_and_counter_positive(array, n, m, z);

print_array3(pair_array_and_positive_sum.first, n, m, z); // ЕСЛИ НЕ НАДО ВЫВОДИТЬ, ТО ЗАКОММЕНТИРОВАТЬ

cout << "Сумма всех положительных элементов в массиве равна: " << pair_array_and_positive_sum.second.second << endl;

if (pair_array_and_positive_sum.second.first > n* m* z - pair_array_and_positive_sum.second.first) {

 cout << "Положительных чисел больше на " << n * m * z - (n * m * z - pair_array_and_positive_sum.second.first) << endl;

}

else {

 cout << "Отрицательных чисел больше на " << n * m * z - 2 * pair_array_and_positive_sum.second.first << endl;

}

}