Составьте метод вычисления суммы всех естественных чисел, не превосходящих данного

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

Задать свой вопрос
Аринка Бышенко
пожалуйста помогите
1 ответ
var  
n, i, sum: integer;  
begin  
read(n);  
for i := 1 to n do sum := sum + i;  
writeln(sum);
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт