84

Помогите составить программу решения задачи в паскаль АВС. Дано целое числоN…

05 февраля 2023

Помогите составить программу решения задачи в паскаль АВС. Дано целое числоN (больше 0). Найти сумму N квадрат +(N+1) квадрат +(N+2) квадрат +… +(2 умножитьN) квадрат (целое число)

категория: информатика

82

Var x, i, n: integer; begin readln (n); for i: =0 to sqr (2*n) do x: =x+sqr (N+i); writeln (x); end. Наверное, Вы это имели в виду=)

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...