Ну алгоритм: просто суммируешь поочерёдно.(можно кубиками нарисовать, но это мне делать не удобно, тем более не сложно)
Вот прога на паскале:
program sym
var p:array[1..12] of integer;
s,i:integer;
Begin
s:=0;
For i:=1 to 12 do
p[i]:=i*i; //если нет уже готового массива
For i:=1 to 12 do
s:=s+p[i];
write(s)
end.
Ну тут кстати массив излишен, если надо просто найти сумму:
program sym1
var s,i:integer;
Begin
s:=0;
For i:=1 to 12 do
s:=s+i*i;
write(s)
end.
Я у себя не проверял, но должно работать)
1 потомучто этот фаел закрыт в сободном пользовонье 2 в информации могут расылат мошейники 3 потомучто всеровно ты общяешся с живым человеком 1 можно его обидеть этим орозом и это правила этикета
Присваеваеш максимум к каждому числу при определенных условиях
это !!!своеобразный метод!!!
Капюшон!!! в листке я показала как разобраться
Из предложений, связанных между собой какой-то общей темой.