ПОМОГИТЕ, ПРОШУ, ПОЖАЛУЙСТА Составить программу , вычисления суммы ряда....

Question

ПОМОГИТЕ, ПРОШУ, ПОЖАЛУЙСТА
Составить программу , вычисления суммы ряда.
S=2²+4²+6²+.....+20²
Всё в Паскаль

Answer 1

 var   
s,a : integer;     

begin 
a := 2; 
s := 0;   
While a <= 20 do    <br>begin   
s := s + sqr(a);    
a := a +2;       
end;   
writeln (s); 
readln(); 
end.