Question

Составьте программу для подсчёта суммы квадратов чисел от 5 до 10 НА ПАСКАЛЕ!

Answer 1

Var i,sum: integer;
begin
sum:=0;
for i:=5 to 10 do
begin
sum:=(i*i)+sum;
end;
writeln('Сумма: ',sum);
End.

Answer 2

Для подсчета суммы квадратов чисел от 5 до 10 на языке программирования Pascal, можно использовать следующий код:

pascalCopy code
program SumOfSquares;

var
  i, num, sum: integer;

begin
  sum := 0;

  for i := 5 to 10 do
  begin
    num := i * i; // Квадрат числа i
    sum := sum + num; // Добавляем квадрат числа i к сумме
  end;

  writeln('Сумма квадратов чисел от 5 до 10: ', sum);
end.

Этот код объявляет переменные i (для цикла), num (для хранения квадрата числа) и sum (для хранения суммы квадратов). Затем используется цикл for, который проходит от 5 до 10, и внутри цикла каждое число возводится в квадрат и добавляется к переменной sum. После окончания цикла выводится результат - сумма квадратов чисел от 5 до 10.