Подсчитать сумму первых п натуральных чисел pascal begin end

Для подсчета суммы первых \( p \) натуральных чисел в Паскале, вы можете воспользоваться следующей формулой:

\[ S = \frac{p(p + 1)}{2} \]

Где \( S \) — сумма первых \( p \) натуральных чисел, а \( p \) — количество натуральных чисел.

Теперь, если вы хотите написать программу на Паскале, которая вычисляет эту сумму, код будет выглядеть так:

program SumOfNaturalNumbers;
var
  p: Integer;
  sum: Integer;
begin
  writeln('Введите количество натуральных чисел (p):');
  readln(p);
  
  sum := (p * (p + 1)) div 2; // Используем целочисленное деление
  
  writeln('Сумма первых ', p, ' натуральных чисел равна: ', sum);
end.

В этой программе пользователь вводит количество натуральных чисел \( p \), и затем программа вычисляет сумму, используя формулу, которую мы обсудили.

Если у вас возникнут вопросы по этому коду или по теме, пожалуйста, не стесняйтесь задавать!