(PASCAL) Написать программку, которая вычисляет сумму первых п целыхположительных

(PASCAL)
Написать программку, которая вычисляет сумму первых п целых
положительных целых чисел. Количество суммируемых чисел обязано
вводиться во время работы программки. Ниже представлен рекомендуемый
вид экрана во время работы программки (данные, введенные юзером,
выделены полужирным шрифтом).
Вычисление суммы положительных чисел.
Введите количество суммируемых чисел gt; 20
Сумма первых 20 положительных чисел равна 210

Задать свой вопрос
1 ответ
Var
  n, i, sum : integer;
begin
  writeln('Введите количество суммируемых чисел');
  readln(n);
  
  sum := 0;
  
  for i := 1 to n do
    sum := sum + i;
  
  writeln('Сумма первых ', n, ' положительных чисел одинакова ', sum);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт