Ребят, помогите! Необходимо отыскать сумму (информатика, паскаль)1^2+2^2+3^2+4^2...n^2

Question

Ребят, помогите! Необходимо отыскать сумму (информатика, паскаль)
1^2+2^2+3^2+4^2...n^2

Николай Псалаев 2019-03-02 08:19:36

Потому var n:integer; Readln(n); Writeln(n*(n+1)*(2*n+1) div 6) end.

Рома Полишкаров 2019-03-02 08:18:48

мне нужна сама программка паскаль

Пашка Нестератов 2019-03-02 08:23:40

Пренебрегал begin

Маргарита Пуцыло 2019-03-02 08:25:55

var n:integer; begin Readln(n); Writeln(n*(n+1)*(2*n+1) div 6) end.

Виталий Гамолин 2019-03-02 08:31:39

спасибо)

Igor Bujanov 2019-03-02 08:38:57

Gj;fkeqcnf

Катя Потайчук 2019-03-02 08:41:38

Ой.... пожалуйста

Дальницкий Дмитрий 2019-03-02 08:45:48

спасибо за формулу

Ильяшов Сергей 2019-03-02 08:49:04

Есть хороший таковой справочник... под редакцией Прудникова. "Интегралы и ряды". Там тысячи интереснейших формул...

Аристарова Кристина 2019-03-02 08:57:04

Но в данном случае это один их приватных случаев формулы Фаулхабера (Faulhaber)

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

Анна Благочевская · Answer 1 · 2019-03-02 08:15:38+3:00

Анна Благочевская 2019-03-02 08:15:38

Var a,n,i,s:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
begina:=sqr(i);
s:=s+a;
end;
writeln(s);
end.

Vanek Kalanovskij 2019-03-02 08:23:59

спасииибо огромное