известно первый и пятый члены арифметической прогрессии. Найти величину члена прогрессии с номером n и сумму n членов. написать это в программе паскаль.

  • В прикрепленном изображении указаны формулы, необходимые для решения этой задачи. Код программы приведен ниже.
    Удачи!

    var a1, a5, an, d, sum, n : integer;
    begin
    readln(a1, a5, n); {получаем на вход первый и пятый члены прогрессии и число n}

    d := (a5 - a1) div 4; {Находим разность прогрессии}

    an := a1 + (n - 1) * d; {Находим член прогрессии с номером n}

    sum := ((a1 + an) * n) div 2; {Находим сумму первых n членов прогрессии}

    writeln('n-ый член прогрессии: ', an);

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




See also: