НАЙТИ СУММУ1² + 2² + 3² ...+10². Операцию возведения в степень не использовать.Паскаль

Question

НАЙТИ СУММУ
1² + 2² + 3² ...+10². Операцию возведения в степень не использовать.Паскаль

Answer 1

Var  x,s: integer;  
begin
  for x := 1 to 10 do
    s:= s+x*x;
writeln('Сумма равна ',s);
end.

Comments

а не надо добавлять после begin что s:=0;

---

В новых версиях Паскаля не надо. Первоначальное значение у всех переменных уже равно 0. В старых версиях надо.

---

да? спасибо

---

Да, точно)) Можешь добавить в новой версии, хуже не будет. Результат работы одинаков будет.

Answer 2

var
  a, b: integer;  

begin
  for a := 1 to 10 do
    b += a * a;
  writeln(b);
end.

Comments

а что означает +=

---

Это перешло в Паскаль с его адаптацией под .NET, позволяет сразу приварить к переменной некоторое значение... Аналогично
+=
-=
*=
/=