Question

Помогите плиз!!! 15 баллов! Дана такая хрень: 1+2+5+8+13... То есть, прибавляем предыдущее число. Пользователь вводит сколько должно быть чисел в ряду, а программа должна посчитать сумму. Напишите в Паскале, плииииз!!!

Answer 1

Конечно, я могу помочь с написанием программы на языке Pascal для вычисления суммы такой последовательности. Вот пример кода:

program SumOfSequence;

var
  n, i, currentNumber, sum: integer;

begin
  // Вводим количество чисел в последовательности
  write('Введите количество чисел в последовательности: ');
  readln(n);

// Инициализируем переменные
  currentNumber := 1;  // Первое число последовательности
  sum := 0;           // Изначальная сумма

// Вычисляем сумму
  for i := 1 to n do
  begin
    sum := sum + currentNumber;
    currentNumber := currentNumber + i * 3;  // Прибавляем i * 3 для получения следующего числа
  end;

// Выводим результат
  writeln('Сумма первых ', n, ' чисел в последовательности: ', sum);

readln;
end.

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