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