Помогите пожалуйста, написать программу в Паскаль и составить блок- схему :
Найти сумму всех натуральных чисел от 1 до m используя формулу суммы членов арифметической прогрессии.
Ответы
Ответ дал:
0
Ответ:
program arifmseq;
var m,sum:real;
begin
writeln ('Введите число m');
read (m);
sum:=((1+m)/2)*m;
writeln ('сумма всех натуральных чисел от 1 до m=',sum);
end.
Объяснение:
Вас заинтересует
1 год назад
2 года назад
7 лет назад