• Написать программу на языке Pascal вычисления суммы чисел кратных 3-ём в диапазоне от 1 до 100. Помогите!

Ответы 3

  • А зачем результат, если нужно само вычисление и нужно самим вводить цифры с клавиатуры?
  • По условию задачи ничего вводить не нужно.
    • Автор:

      beckett
    • 6 лет назад
    • 0
  • var i,s:integer;begins:=0;for i:=1 to 100 do if i mod 3 = 0 then s:=s+i;writeln('s = ',s);end.Результат:s = 1683
    • Автор:

      yaelko2s
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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