Задача выполняется в Паскале! Даны два целых числа A и B (A меньше B). Найти сумму квадратов всех целых чисел от A до B включительно. Помогите плииз.
Задача выполняется в Паскале! Даны два целых числа A и B (A < B). Найти сумму квадратов всех целых чисел от A до B включительно. Помогите плииз.
Гость
Ответ(ы) на вопрос:
Гостьvar
i, a, b: integer;
k: Int64;
begin
readln(a, b);
for i := a to b do
k += sqr(i);
writeln(k);
end.
Не нашли ответ?
Похожие вопросы