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

  • составить программу вычисления суммы нечётных чисел от 1 до 99.

Ответы 1

  • var i,s:integer;

    begin

       s:=0;

       for i:=1 to 99 do

          if (i mod 2=1) then inc(s,i);

       writeln(s)

    end.

    • Автор:

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

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

Еще вопросы

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

Войти через Google

 или

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

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

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