Прошу, составить программу , вычисления суммы ряда. s=2²+4²+6²++20² всё в паскаль

  var    s,a : integer;         begin  a : = 2;   s : = 0;       while a < = 20 do      begin    s : = s + sqr(a);       a : = a +2;         end;       writeln (s);   readln();   end.

Числа можно записывать в порядке неубывания: 211 можно представить как 21 и 1, 21 мы не можем, значит 211 не подходит. 1717 можно представить как 17 и 17. эти числа можно получить из 98 и 98, оно нам подходит. 1817 можно представить как 18 и 17, эти числа можно получить из 99 и 97, но оно нам не подходит так как числа записаны в порядке убывания а 817 мы не можем получить сложив две цифры. 1718 нам подходит, предыдущее число, но записанное в порядке неубывания, можно получить из чисел 99 и 97. 1719 нам не подходит, так как мы не можем по лучить 19 при сложении двух цифр. 219 нам не подходит так как должны быть числа либо 2 и 19, либо 21 и 9. 19 и 21 мы не можем получить при сложении двух цифр. 21 нам не подходит. 10 нам не подходит, так как одно из чисел должно будет быть равно нулю, а в условии двузначные числа. ответ: 2 

На языке c #include < stdio.h> #define min -10 #define max 10 void vychislenie(float shag); int main(){     float shag=0; //shag x-a        printf("programma vyschityvaet znachenija funkcii y=x^2 pri x = -10 do 10\n\n");           printf("vvedite shag funkcii: ");     scanf("%f", & shag);     vychislenie(shag); return 0; } void vychislenie(float shag){       float y=0;         float x=min; //x=-10     do{                  y=x*x;                     if(x> =min& & x< =max){                                  printf("x=%.2f   y=%.2f\n", x, y);                     }                    x=x+shag;             }while(x< max+1); }