• Предмет: Информатика
  • Автор: ЦарьНиколай
  • Вопрос задан 9 лет назад

Задача в паскале. Даны два числа А и Б, где А<Б. Найти сумму квадратов ВСЕХ целых чисел от A до B включительно. Как это сделать через цикл For?

Ответы

Ответ дал: HiroX
0
var i, sum: integer;

for i:=a to b do
begin
sum:= sum + i*i;
writeln(sum);
end;
writeln();
writeln(sum);
Ответ дал: ЦарьНиколай
0
Сказали неверно, нужно вывести сумму всех квадратов, то есть кв 4 + кв 4 = 32 (неверно) нужно суммировать квадраты 1, 2, 3, 4 (до введённого числа А) и 1,2,3,4 (до введённого числа B).
Ответ дал: HiroX
0
так чтоли?
Ответ дал: ЦарьНиколай
0
нет)
Ответ дал: HiroX
0
по-любому последний sum и есть ответ
Ответ дал: HiroX
0
вот так?)
Похожие вопросы