Question

Как в паскале записать сумму чисел от 1 до n

Answer 1

Возможны ошибки.
Program prim;
Var x, s: integer;
Begin
s:=0
For x:= 1 to n do s:=s+x
Writeln ('Сумма равна' , s)
End.

Answer 2

В Паскале (язык программирования Pascal) вы можете записать сумму чисел от 1 до n с использованием цикла и переменной аккумулятора. Вот пример кода:

pascalCopy code
program SumOfNumbers;

var
  n, sum, i: Integer;

begin
  writeln('Введите значение n:');
  readln(n);

  sum := 0; // инициализация аккумулятора

  for i := 1 to n do
  begin
    sum := sum + i; // добавляем текущее число к сумме
  end;

  writeln('Сумма чисел от 1 до ', n, ' равна ', sum);
  
  readln;
end.

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