Аватар
Информатика, опубликовано 2018-08-22 17:38:22 by Гость

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

Аватар
Ответ оставил Гость

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

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.