Для заданного натурального n и действительного x подсчитать сумму
S=1^2+2^2+3^2+...+n^2​

#include <iostream>

void main() {

int n, s = 1;

std::cin >> n;

for (int i = 2; i <= n; i++)

 s += i * i;

std::cout << s;

}

uses crt; var

  i,s1,s2: integer; begin  for i: =1 to 100 do  begin    if i mod 2=0 then s1: =s1+i    else s2: =s2+i;   end;   writeln('сумма четных чисел: ',s1);   write('сумма нечетных чисел:   ',s2); end.

программа на паскале:

program xxx;

  var i, n, s : integer;

begin

  write ('введите n =' );

  readln (n);

  s: =0;

  for i: =1 to n do

    s: = s+ sqr(i+1);

  writeln ('сумма =' , s);

  readln

end.