Question

Найти сумму пяти элементов последовательности: 3, 6, 9, 12, …. срочнооо!!! на языке Паскаль ​

Answer 1

Ответ:

Var  

n,i: integer;

s, a: real;

Begin

s:=0;

writeln ('Введите количество элементов в последовательности: ');

readln(n);

If n>0 then

 Begin  

  For i:=1 to n do  

   Begin

    writeln ('Введите число: ');

    read(a);

    s:=s+a;

   end;

  end;

 writeln ('Сумма элементов = ',s);

End.

Объяснение:

Это универсальный вариант суммы n элементов последовательности.

Ты вводишь n, как тебе нужно, в данном случае 5.

Далее вводишь нужные числа.

Answer 2

Вот пример кода на языке Паскаль для нахождения суммы пяти элементов данной арифметической последовательности:

pascalCopy code
program SumOfSequence;
var
  i, n, sum: integer;
begin
  sum := 0;
  n := 5; // Количество элементов последовательности

  for i := 1 to n do
  begin
    sum := sum + 3 * i; // 3 - начальный элемент последовательности, i - номер элемента
  end;

  writeln('Сумма первых ', n, ' элементов последовательности: ', sum);
end.

Вы можете скопировать этот код в среду разработки на языке Паскаль и выполнить его, чтобы найти сумму первых пяти элементов данной последовательности.