Паскаль, помогите ПЖ, последнее задание срочно!!!

Question

Паскаль, помогите ПЖ, последнее задание срочно!!!

---

Comments

Еще темнее сделать просто не получилось?

---

там всё понятно, если не можите не делайте

---

Да, пожалуй я не смогу))))))))

Answer 1

Var m,n,sum: integer;
Begin
sum:=0;
Write(‘Введите конечное число повторений: ‘);
Readln(m);
For n:=1 to m do
Begin
sum:=sum+(n*n*n-3);
End;
Write(‘Ответ: ‘’,sum);
End.