разобраться с кодом, верно ли я написала? СИ ++
В методичке 3 лаба, вариант 2 (стр 41)

Сам код:
using namespace std;
#include "iostream"
#include
#include

using std::cin; using std::cout; using std::endl; using std::setw;

int main()
{
double x, y;
int i;

cout << setw(15) << "№ п/п";
cout << setw(15) << "x" << setw(15) << "Y(x)" << setw(15) << "S(x)";
cout << endl;
i = 1;
for (x = 0.1; x <= 1; x = x + 0.09)
{

y = (exp(x)+exp(-x))/2;

double slag, Summa_Ryada;
int k, n;
slag = pow(x,2);
Summa_Ryada = slag;
n = 100;
for (k = 2; k <= n; k++) {

slag = (slag*pow(x,2))/2*k;
Summa_Ryada = Summa_Ryada + slag;
}
Summa_Ryada = Summa_Ryada + 1;

cout << setw(15) << i ;
cout << setw(15) << x ;
cout << setw(15) << y ;
cout << setw(15) << Summa_Ryada;
cout << endl;
i++;
Summa_Ryada = 0;
}
cout << endl;
system("pause");
}

Var
    N, s, i: Integer;
    s1: real;

begin
    readln(N); {общий ввод для всех задач}
    
    if N < 0 then
        writeln('Задача 1. N=', 0)
    else writeln('Задача 1. N=', N + 4);
    
    s := 0;
    for i := 1 to n do
        s := s + i;
    writeln('Задача 7. 1+2+3+…+N=', s);
    
    write('Задача 9. Последовательность от N до 1 = ');
    for i := n downto 1 do
        write(i, ' ');
    writeln();
    
    s1 := 0;
    for i := 1 to n do
        s1 := s1 + i / 10;
    writeln('Задача 12. 0,1+0,2+0,3+..+N/10=', s1);
    
    write('Задача 13. Последовательность квадратов от 1 до N = ');
    for i := 1 to n do
        write(i * i, ' ');
    writeln();
    
    write('Задача 14. Последовательность первых N нечетных чисел = ');
    for i := 1 to n do
        write(2 * i - 1, ' ');
    writeln();
    
    if N > 0 then
        writeln('Задача 20. N степень 3 = ', frac(ln(n) / ln(3)) = 0);
    
    s := 0;
    for i := 1 to n do
        if n mod i = 0 then
            s := s + i;
    writeln('Задача 24. Сумма всех натуральных делителей числа N (сключая 1 и N) = ', s);
end.

// pascalabc.net 3.3, сборка 1579 от 18.11.2017 // внимание! если программа не работает, обновите версию! begin   writeln('*** исходный массив ***');   var a: =matrrandom(2,4,-10,30);   a.println(4); writeln(4*a.colcount*'-');   writeln('п = ',a.elementsbyrow.where(t-> t.between(1,19))           .aggregate(1,(x,y)-> x*y)) end. пример *** исходный массив ***   24  16  22  12     2    5    1    8 п = 15360