Вводится натуральное число. найти сумму квадратов всех натуральных чисел от 1 до этого числа.
110
202
Ответы на вопрос:
Var n, sum, i : longint; begin read(n); for i : = 1 to n do sum : = sum + sqr(i); write(sum); end.
Популярно: Информатика
-
Morikachan4613.06.2021 22:07
-
IamGroot108.07.2020 01:53
-
СвинкаГоппа30.07.2020 15:42
-
kacamber22830.04.2020 14:33
-
Hwasooyeon07.01.2021 16:47
-
TatarskayaGreckha26.01.2020 18:03
-
hhwjsbjweujskzks16.01.2021 14:20
-
Arinka72201.06.2021 10:03
-
vika206302.10.2021 14:03
-
nelli3707.07.2022 23:34