Question

Учу бэйсик, а надо сделать на паскале вот такую програмкунайти сумму n-членов арифметической прогрессии, первый член которой a, разность b край, печаль беда

Answer 1

Program n1;
var n:integer;
a,b,s:real;
begin
write ('введите значения a, b, n')
readln (a, b, n);
s:=((2*a+(n-1)*b)/2)*n;
writeln (s);
end.

P.S: Извините, что так долго. Просто я с телефона сижу.

Answer 2

Для решения данной задачи на языке программирования Pascal вам потребуется написать программу, которая будет находить сумму n-членов арифметической прогрессии с заданным первым членом a и разностью b.

Вот пример программы на Pascal, которая решает данную задачу:

program SumOfArithmeticProgression;

var
  n, a, b, sum: integer;
  i: integer;

begin
  writeln('Введите количество членов прогрессии (n): ');
  readln(n);
  
  writeln('Введите первый член прогрессии (a): ');
  readln(a);
  
  writeln('Введите разность прогрессии (b): ');
  readln(b);
  
  sum := 0;
  
  for i := 1 to n do
  begin
    sum := sum + a;
    a := a + b;
  end;
  
  writeln('Сумма ', n, '-членов арифметической прогрессии: ', sum);
  
end.

В этой программе мы сначала запрашиваем у пользователя количество членов прогрессии (n), первый член прогрессии (a) и разность прогр#### Writing a Program to Find the Sum of n Terms of an Arithmetic Progression in Pascal

To write a program in Pascal to find the sum of n terms of an arithmetic progression with the first term a, common difference b, and the number of terms n, you can use the following code:

program SumOfArithmeticProgression;

var
  a, b, n, sum: integer;

begin
  writeln('Enter the first term (a): ');
  readln(a);
  writeln('Enter the common difference (b): ');
  readln(b);
  writeln('Enter the number of terms (n): ');
  readln(n);

sum := (n * (2 * a + (n - 1) * b)) div 2;

writeln('The sum of the arithmetic progression is: ', sum);
end.

This program prompts the user to input the first term (a), the common difference (b), and the number of terms (n). It then calculates the sum of the arithmetic progression using the formula: sum = (n * (2 * a + (n - 1) * b)) / 2.

I hope this helps! Let me know if you have further questions or need additional assistance.