Question

Найдите сумму 1*2+2*3+3*4+...+9*10. Составьте программу на языке паскаль. Помогите пожалуйста!!!

Answer 1

Var
i, s: integer;
begin
s:=0;
for i:=1 to 9 do
s:=s+i*(i+1);
writeln(s);
end.

Answer 2

Для нахождения суммы выражения 1*2 + 2*3 + 3*4 + ... + 9*10, можно воспользоваться формулой для суммы арифметической прогрессии. Формула для суммы арифметической прогрессии выглядит следующим образом:

S = (n/2) * (a + b),

где S - сумма прогрессии, n - количество элементов в прогрессии, a - первый элемент, b - последний элемент.

В данном случае, у нас есть 10 элементов в прогрессии (от 1 до 10), первый элемент равен 1, а последний элемент равен 10. Подставляя значения в формулу, получаем:

S = (10/2) * (1 + 10) = 5 * 11 = 55.

Таким образом, сумма выражения 1*2 + 2*3 + 3*4 + ... + 9*10 равна 55.

Программа на языке Pascal:

program SumOfProducts;
var
  i, sum: integer;
begin
  sum := 0;
  for i := 1 to 9 do
  begin
    sum := sum + (i * (i + 1));
  end;
  writeln('Сумма выражения 1*2 + 2*3 + 3*4 + ... + 9*10 равна: ', sum);
end.

Эта программа использует цикл `for` для вычисления суммы выражения. В каждой итерации цикла, мы умножаем текущее значение `i` на следующее значение `i + 1` и добавляем результат к переменной `sum`. В конце программы, выводится значение суммы на экран.

Надеюсь, это поможет! Если у вас возникнут еще вопросы, не стесняйтесь задавать.