Составьте алгоритм вычисления сумму всех натуральных чисел, не превышающих заданного натурального числа N. Проверьте алгоритм трассировкой.

Это алгоритм вычисления суммы всех чисел от 1 до N.
S = N*(N - 1)/2
Вот и весь алгоритм.
А если надо в цикле, то так
S := 0
for i=1 to N do S := S + i;

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.