Помогите пожалуйста, написать программу в Паскаль и составить блок- схему :

Найти сумму всех натуральных чисел от 1 до m используя формулу суммы членов арифметической прогрессии.

Ответ

Автор - mesmerizingbutterfly

Ответ:

program arifmseq;

var m,sum:real;

begin

writeln ('Введите число m');

read (m);

sum:=((1+m)/2)*m;

writeln ('сумма всех натуральных чисел от 1 до m=',sum);

end.

Объяснение:

Предыдущий вопрос Следующий вопрос

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.