Как посчитать сумму этих чисел в ПАСКАЛЕ?? ? 1^2+2^2+3^2+4^2+5^2 ЭТО НАДО СДЕЛАТЬ не ВОЗВОДЯ ИХ В СТЕПЕНЬ!!!!

ВСЕ спасибо ПРАВИЛЬНО ТАК!! !
program Z_3;
var n,S:integer;
begin
S:=0;
for n:=1 to 10 do
S:=n*n+S;
writeln (S);
end.