Задать вопрос Регистрация
Помочь другим

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

Ответы 2

  • Спасибо

    • Автор:

      ryder87
    • 5 лет назад
    • 0
  • varsum, i, n:integer;begin  read(n);  for i:= 1 to n do    sum:= sum + i;  Writeln(sum);    end.

    • Автор:

      edenfywa
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years