Войти Регистрация Спроси ai-bota

Вычислить сумму квадратов чисел от одного до n

Ответ:

oiopiha

24.07.2020 21:00

Var i, n: integer; sum: longint;
begin
sum:=0;
readln(n);
for i:=1 to n do inc(sum, i*i);
writeln(sum);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

kristinakarpen

27.02.2020 03:15

Делимся мыслями Найди в таблице слова, связанные с темой. Опредензначение каждого найденного слова. Поделись с товарамыслями о ходе выполнения задания. .А РМ и...

vanyad09

02.12.2021 19:16

Найдите сумму первых шести членов прогрессии, если b1=10, q=-1/5 все объясните....

kamillagabbasoVa

02.12.2021 19:16

Найдите периметр построенного прямоугольника...

MoskowCorp

02.12.2021 19:16

Синтаксический разбор предложения; : 1) я жить хочу , и пить , и есть , хочу тепла и света....

perevuznik1

02.12.2021 19:16

Решите уравнение (5x-3)(x+2)-5x(x-1)=0...

Тотах

02.12.2021 19:16

)) морфологический разбор слова двигалась.заранее...

ум5789

02.12.2021 19:16

My hometown is special (владивосток) i like living there you favourite special вставьте пропущеные слова...

vikailen

02.12.2021 19:16

Мне! надо выучить стихотворение о войне не большое подкиньте . надо...

Xopccc13377

02.12.2021 19:16

Отдых на природе 5-6 пред сочинение на казахском...

Caxapok24

02.12.2021 19:16

Решить уравнение с модулем 3-/х-1/+9=30...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку